Я пытаюсь отформатировать изображение для публикации и не могу получить экспортированное изображение с правильными размерами или разрешением. В приведенном ниже примере используется ggplot2, но я также, похоже, не могу получить правильный размер и разрешение с помощью графика базового пакета. Я делал это раньше без проблем, но это было несколько лет ... любой вклад приветствуется.
Примечание: я пробовал это и на Ма c (Каталина) и Windows ( 10) операционные системы, так как у меня недавно были некоторые проблемы с R на моей MacOS. Выходной показатель одинаков в обеих ОС.
fake.cat<-c("a", "b", "b", "a", "a", "a", "a", "b", "b", "b")
fake.x<-c(1:10)
fake.y<-c(1:10)
fake.df<-data.frame(fake.cat, fake.x, fake.y)
ggplot(data=fake.df, aes(x=fake.x, y=fake.y, fill=fake.cat))+
geom_bar(stat="identity", position=position_dodge())
ggsave("test_gg.png", width=100, height=100, units="mm", dpi=300)
#actual graphic output is an image that is 416.63 mm x 416.63 mm and 72 dpi
#additional attempts below using the regular graphics saving commands
#output is the same for me as it is with ggsave(), regardless of file format
png(filename="test_png.png", width=100, height=100, units="mm", res=300)
ggplot(data=fake.df, aes(x=fake.x, y=fake.y, fill=fake.cat))+
geom_bar(stat="identity", position=position_dodge())
dev.off()
jpeg(filename="test_jpg.jpeg", width=100, height=100, units="mm", res=300)
ggplot(data=fake.df, aes(x=fake.x, y=fake.y, fill=fake.cat))+
geom_bar(stat="identity", position=position_dodge())
dev.off()