сохранять вывод консоли каждого запуска цикла for в отдельные файлы

Я хочу сохранить вывод консоли каждого запуска цикла for в отдельном текстовом файле. Я делаю следующее.

for(i in 1:x)
{
  sink(paste0("file", i, ".txt"))

  ## do something

}

Но при этом через некоторое время я получаю сообщение об ошибке

Error in sink() : sink stack is full

Как это сделать наиболее эффективно?


person user3664020    schedule 04.11.2015    source источник


Ответы (1)


вам нужно закрыть соединение с файлом за sink(), поэтому:

for(i in 1:x) {
  sink(paste0("file", i, ".txt"))
  ## do something
  sink()
}
person jogo    schedule 04.11.2015