保存ggplot时图表标签不缩放

Question

长期阅读，第一次提问！

我正在尝试使用ggsave 命令从 ggplot 中保存一堆绘图，但标签并未与绘图大小成比例地调整。

例如，使用 iris 数据集：

data(iris)

iris$study.number <- sample(1:5, replace=T)

ggplot(iris) + aes(x=study.number, fill=Species) +
  geom_bar(position="stack") 

ggsave("iris.png", scale=3)

虽然保存的图像中的绘图比查看器中显示的大三倍，但标签仍然非常小。我试过只是操纵长度和宽度参数，但无济于事。

如果可能的话，我更喜欢使用ggsave（它比保存绘图的其他选项要容易得多，但如果只能使用其他方法，我绝对愿意接受。

Answer 1

图表标签的缩放方式与其他绘图元素的缩放方式不同。一种解决方法是修改 ggplot 本身的文本大小。例如：

library(ggplot2)
data(iris)

iris$study.number <- sample(1:5, replace=T)

ggplot(iris) + aes(x=study.number, fill=Species) +
    geom_bar(position="stack") +
    theme(text = element_text(size = 60))

ggsave("iris.png", scale=3)

theme(text = element_text(size = 60)) 行增加了所有标签的字体大小。