writeLine R без кавычек

Question

Я использовал gsub для замены одной и той же "строки" в нескольких файлах на строки в файле data.frame, то есть для файла 1 я заменяю "строку" на "замена 1", для файла 2, «строка» на «замена 2» (в файле replace_df) и т. Д. (Как в приведенном ниже примере скрипта)

in_list<-lapply(files_in_list, readLines)
 out_list<-list() 
  for (i in 1:length(in_list)) {
      out_list[i]<-gsub(replace_df[i,1],replace_df[i,2],in_list[i])
}

Хотя и немного грязно, все работает нормально. У меня проблема с записью этих файлов в .txt файлы. Когда я пытаюсь записать строки, это приводит к грязным файлам, каждая строка в кавычках и теряет формат исходного файла. Как избежать, чтобы файлы результатов не содержали кавычек в каждой строке, сохраняя оригинальный формат? Привет

Answer 1

Замените ваш in_list[i] на in_list[[i]], по той же причине, по которой @GregorThomas предложил его для out_list.

В качестве демонстрации:

in_list <- list(c('a','b'), c('a','b'))
gsub('a', 'A', in_list[1])
# [1] "c(\"A\", \"b\")"            # wrong

gsub('a', 'A', in_list[[1]])
# [1] "A" "b"                      # correct