Создайте список комбинаций и удалите предварительно использованные

Question

В разделе R я пытаюсь создать цветовые сочетания, и после этого хочу импортировать предварительно использованные комбинации, удалите это для всех возможных комбинаций и, наконец, экспортируйте доступные комбинации. У меня были проблемы с удалением этих предварительно использованных. Спасибо за вашу помощь! Все самое лучшее, - Carlos

rm(list=ls());ls() 
library("gtools") 

# Generate all colors combinations 
colors<-c("RED","GREEN","BLUE","BLACK","PINK") 
size.of.combinations<-4 
all.possible.combinations<-permutations(length(colors),size.of.combinations,colors,repeats.allowed=T) 

# Import used data 
used.comb<- read.table(file = "used.txt", header = TRUE); 
used.comb<-as.matrix(used.comb) 

# Removed pre-used combinations 
comb.available<-all.possible.combinations-used.comb #here is the problem 

my.data<-data.frame(comb.available) 
write.table(my.data, file = "data.csv", sep = ",", col.names = NA, qmethod = "double") 

Answer 1

Удалить предварительно используемые комбинации с этим, он должен работать нормально (остальные строки в порядке).

# Removed pre-used combinations 
comb.available<- 
      do.call(rbind, strsplit(setdiff(
       apply(all.possible.combinations, 1, function(x) paste(x, collapse=',')), 
       apply(used.comb, 1, function(x) paste(x, collapse=','))), split=',')) #this should work fine