r - ggsave scale 不缩放文本大小

Question

每当我使用 ggsave 和 scale 保存绘图时，绘图的大小都会增加，但文本的大小不会。

ggplot(economics, aes(date, unemploy)) + 
  geom_line(color="#2fb2ab") +
  theme_ipsum() +
  theme(
    text = element_text(family="Georgia"),
    axis.title.x = element_text(hjust=0.5, size=13, family="Georgia"),
    axis.title.y = element_text(hjust=0.5, size=13, family="Georgia"),
    panel.border = element_rect(colour = "black", fill=NA))+
  ylab("Unemployment") +
  xlab("Date")

ggsave("sample_graph.png", scale = 2)
ggsave("sample_graph2.png", scale = 3)

这是图 1:

这是图2:

如何让它同时缩放图形大小和字体？我不想手动设置高度和宽度。

Answer 1

ggsave 的 scale 参数似乎只影响绘图区域而不影响字体。要修改字体大小，就像您在代码中所做的那样，您必须在 axis.title.x 或 axis.title.y 中传递参数。

避免此问题的一种方法是设置比例因子并在您的 theme 函数和 ggsave 中使用它。像这样的东西应该可以解决问题:

library(ggplot2)
scale_factor = 3
ggplot(economics, aes(date, unemploy)) + 
  geom_line(color="#2fb2ab") +
  theme(
    text = element_text(family="Georgia"),
    axis.title.x = element_text(hjust=0.5, size= scale_factor * 13, family="Georgia"),
    axis.title.y = element_text(hjust=0.5, size= scale_factor * 13, family="Georgia"),
    panel.border = element_rect(colour = "black", fill=NA))+
  ylab("Unemployment") +
  xlab("Date")

ggsave("sample_graph.png", scale = scale_factor)

如果是你要的请告诉我