Проблемы с изменением размеров шрифта метки оси - PullRequest
Новая
       5

Проблемы с изменением размеров шрифта метки оси

0 голосов
/ 28 июня 2018

У меня фактически очень простой вопрос.

Я использую код ggplot2 для изменения размера шрифта текста оси и надписей. Однако, где бы я ни размещал команду, никакие изменения не видны на осях. Все остальные команды работают, поэтому у меня создается впечатление, что что-то «переопределяет» команду theme (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 голосов
/ 28 июня 2018

Я думаю, что вы могли позвонить theme_bw() после изменения форматирования текста оси. Любое форматирование, которое вы хотите изменить по умолчанию, необходимо изменить после вызова theme_bw. Кроме того, чтобы быть немного чище и теснее, вы можете объединить все свои theme аргументы в одну группу, чтобы было легче отслеживать, что вы меняете. Решает ли приведенный ниже код проблему?

Вы также указываете strip.text и strip.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())
...