Сравните два заголовка файла и убедитесь, что они имеют одинаковые заголовки независимо от порядка

Question

Я хочу сравнить два файла конфигурации, один сгенерированный пользователем, а другой шаблон.

У меня работает код, но я чувствую, что есть гораздо лучший способ справиться с этим.

#config variable designated previously

current.config.template<-'/location/of/template'
default.config<- read.csv(current.config.template,stringsAsFactors = FALSE)

bool<-colnames(default.config) %in% colnames(config)

for(i in bool){
  if(i==FALSE){
    stop("Please use the most recent met-ingest.csv file located /path/to/file/")
  }
}

Это работает, но я чувствую, что должен быть лучший способ сделать это, а не цикл if внутри цикла for.

Answer 1

Вам не нужен цикл. Вы можете просто сделать это -

if(any(!bool)) {
    stop("Please use the most recent met-ingest.csv file located /path/to/file/")
}