Bir sıradaki eksik değerleri tanımlayın/iki liste arasındaki asimetrik farkı gerçekleştirin

Question

R'yi kullanarak, bir sıradaki hangi değerlerin eksik olduğunu tanımlamak istiyorum. Nasıl yaptığımı örnek olarak yazdım. Daha iyi bir yol olmalı. Birisi yardım edebilir mi?

data.list=c(1,2,4,5,7,8,9) 

full.list=seq(from = 1, to = 10, by =1) 

output <- c() 
for(i in 1:length(full.list)){ 
    holder1 <- as.numeric(any(data.list == i)) 
    output[i] <- holder1 
} 

which(output == 0) 

Answer 1

başka bir olası çözüm

setdiff(full.list,data.list) 

Answer 2

full.list[!full.list %in% data.list] 

Answer 3

full.list[!match(full.list,data.list,nomatch=FALSE)] 
[1] 3 6 10 

Answer 4

grep() kullanarak (%in% benzer) match kullanılarak Başka bir seçenek:

grep(paste("^", data.list, "$", sep = "", collapse = "|"), full.list, invert = TRUE)

Sen "tembel" olarak ve collapse = ^|$ kullanmak ancak kesin doğruluğu için yukarıdaki kullanabilirsiniz.

grepl() kullanma:

full.list[!grepl(paste("^", data.list, "$", sep = "", collapse = "|"), full.list)]