Сохранение data.frames в цикле из списка имен в R - PullRequest
0 голосов
/ 11 июля 2019

Я пытаюсь сохранить некоторые data.frames и таблицы с циклом.Я подумал, что будет проще, если я помещу все имена data.frames в список и вызову этот список позже в цикле for.Но я действительно не понимаю.Список имен работает для имени файла, но я не могу получить реальный кадр данных из списка имен.Я всегда получаю сообщение об ошибке ...

Это мой код на данный момент:

ListTablesCharacter <- c("ResultsConditionDeltaFaceMean","ResultsConditionResponseTimeMean","ResultsManipulationDeltaFaceMean", ... ,"VPNCondition")

for (i in 1:length(ListTablesCharacter)){

  save(get(ListTablesCharacter[i]), file=paste(ListTablesCharacter[i],".rda", sep =""))
  write.csv(get(ListTablesCharacter[i]), file=paste(ListTablesCharacter[i],".csv", sep =""))
}

И это сообщение об ошибке, которое я получаю в данный момент.

Error in save(get(ListTablesCharacter[ii]), file = paste(ListTablesCharacter[ii],  : 
  Object ‘get(ListTablesCharacter[ii])’ not found

Я полагаю, что вторая часть после file = работает.

Есть ли способ получить команду сохранения по этому подходу?

Она должна работать следующим образом.

save(ResultsConditionDeltaFaceMean, file=paste("ResultsConditionDeltaFaceMean",".rda", sep =""))
write.csv(ResultsConditionDeltaFaceMean, file=paste("ResultsConditionDeltaFaceMean",".csv", sep =""))

save(ResultsConditionResponseTimeMean, file=paste("ResultsConditionResponseTimeMean",".rda", sep =""))
write.csv(ResultsConditionResponseTimeMean, file=paste("ResultsConditionResponseTimeMean",".csv", sep =""))
#etc.

Спасибо за помощь.

...