Identyfikacja brakujących wartości w sekwencji/wykonanie asymetrycznej różnicy między dwiema listami

Question

Używając R, chcę sprawnie zidentyfikować, które wartości w sekwencji nie występują. Napisałem poniższy przykład, jak to zrobić. Musi być lepszy sposób. Czy ktoś może pomóc?

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

Innym możliwym rozwiązaniem

setdiff(full.list,data.list) 

Answer 2

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

Answer 3

Innym rozwiązaniem pomocą match (podobny do %in%)

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

Answer 4

Stosując grep():

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

Możesz być "leniwy" i używać collapse = ^|$, ale użyj powyższej, aby uzyskać dokładną dokładność.

Korzystanie grepl():

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