all_fnames <- as_fnames(c("file1", "file2", "file3",
"file4", "file5", "file6"))
unwanted_fnames <- as_fnames(c("file1", "file4"))
keep_fnames(all_fnames, unwanted_fnames, invert = TRUE)
drop_fnames(all_fnames, unwanted_fnames)
wanted_fnames <- as_fnames(c("file3", "file5"))
keep_fnames(all_fnames, wanted_fnames)
Run the code above in your browser using DataLab