Имейте в виду, что postscrpt()
, pdf()
, png()
и jpeg()
имеют специальные функциональные параметры, которые можно использовать для настройки вывода.
Например:
postscript("filename.eps", horizontal=F, width=4, height=4,
paper="special", onefile=F)
plot(x)
dev.off()
проверьте ?postscript
для получения дополнительной информации о параметрах, которые можно использовать.
Во-вторых, имейте в виду, что все команды, которые вы хотите включить в сохраненный график, должны быть выполнены до dev.off()
Например:
postscript("filename.eps", horizontal=F, width=4, height=4,
paper="special", onefile=F)
plot(x)
text(5, 1, "This is a message for the aliens")
text(5, 0.5, "Pizza is tasty")
dev.off()
Другой пример:
regone <- glm(y ~ x1, data=mydata, family=...)
summary(regone)
postscript("filename.eps", horizontal=F, width=4, height=4,
paper="special", onefile=F)
plot(x, y)
abline(regone)
dev.off()
Надеюсь, это поможет.