Ошибка в jpeg (a_paste_function): слишком много открытых устройств

Question

Я пытаюсь вывести около 250 графиков из r-скрипта и получаю сообщение об ошибке «слишком много открытых устройств». Могу ли я настроить некоторые параметры, чтобы избежать этой проблемы?

Вот пример того, как я создаю графики:

for(x in 250) { 

plots <- ggplot(data=dat, aes(x,y,lab=labels))
jpeg(a_paste_function)
print(plots)

} 

Одна вещь, которую я заметил, это то, что когда я write.table, файлы сразу готовы, в то время как мне всегда нужно закрывать R, чтобы jpegs был «напечатан». Возможно, это реальная проблема, метод, которым я выкидываю графики?

Answer 1

Добавление dev.off () сработало.

for(x in 250) { 

plots <- ggplot(data=dat, aes(x,y,lab=labels))
jpeg(a_paste_function)
print(plots)
dev.off()
}