更改轴标签字体大小时出现问题

时间:2018-06-28 12:11:50

标签: r plot ggplot2 graphic

我实际上有一个非常简单的问题。

我正在使用ggplot2代码来更改轴文本和标签的字体大小。但是,无论我将命令放在哪里,都不会在轴上看到任何更改。所有其他命令都在起作用,所以我给人的印象是某些东西“覆盖”了主题(axis.text ...,axis.title ...)命令。

 ggplot(Cannock, aes(x=Capacity,color=CPType)) + 
   geom_histogram(fill="white",position="identity",binwidth=3,lwd=1) + 
   labs(title="Cannock Chase",x="Capacity", y = "Count") + 
   theme(axis.text=element_text(size=14), axis.title=element_text(size=16,face="bold")) + 
   facet_grid(CPType ~ .) + 
   geom_vline(data=mu1, aes(xintercept=grp.mean, color=CPType), linetype="dashed",size=1) + 
   theme_bw() + 
   theme(axis.line = element_line(colour = "black"),
    panel.grid.major = element_blank(),
    panel.grid.minor = element_blank(),
    panel.border = element_blank(),
    panel.background = element_blank()) + 
   theme(legend.position="none") + 
   theme(strip.text.y = element_text(size=8, fac[![enter image description here][1]][1]e="bold"), strip.background = element_rect(colour="white", fill="white")) + 
   coord_cartesian(xlim = c(0,100)) + 
   theme(strip.background = element_blank(), strip.text = element_blank())

对此,任何指针将不胜感激。非常感谢!

1 个答案:

答案 0 :(得分:0)

我认为可能是您更改了轴文本格式后给您打电话了theme_bw()。您想要从默认设置更改的任何格式都需要在调用theme_bw之后进行更改。此外,为了更简洁,更紧凑,您可以将所有theme自变量组合到一个组中,以便更轻松地跟踪更改的内容。下面的代码可以解决问题吗?

您还用不同的设置两次指定了strip.textstrip.background,这可能不是您想要的。

ggplot(Cannock, aes(x=Capacity,color=CPType)) + 
  geom_histogram(fill="white",position="identity",binwidth=3,lwd=1) + 
  labs(title="Cannock Chase",x="Capacity", y = "Count") + 
  facet_grid(CPType ~ .) + 
  geom_vline(data=mu1, aes(xintercept=grp.mean, color=CPType), linetype="dashed",size=1) + 
  theme_bw() + 
  coord_cartesian(xlim = c(0,100)) +
  theme(axis.text=element_text(size=14), 
        axis.title=element_text(size=16,face="bold"),
        axis.line = element_line(colour = "black"),
        panel.grid.major = element_blank(),
        panel.grid.minor = element_blank(),
        panel.border = element_blank(),
        panel.background = element_blank(),
        legend.position="none",
        strip.text.y = element_text(size=8, face="bold"), 
        strip.text = element_blank(),
        strip.background = element_rect(colour="white", fill="white"),
        strip.background = element_blank())