分別調整情節標題的大小

Question

我有一個情節，我想指定在x和y軸上的標題大小和頂部分開。如何才能做到這一點？

plot+ theme(axis.text=element_text(size=9), 
      axis.title=element_text(size=9), 
      axis.line = element_line(size=0.25), 
      axis.ticks=element_line(size=0.25), 
      panel.grid.major = element_blank(), 
      panel.grid.minor = element_blank(), 
      panel.border = element_blank(), 
      panel.background = element_blank(), 
      legend.position="none" , 
      legend.direction="vertical", 
      legend.title=element_blank(), 
      legend.text=element_text(size=9), 
      legend.background=element_blank(), 
      legend.key=element_blank())+labs(title='this',x='that',y='other') 

現在這個代碼圖表x和相同尺寸y軸和在大得多的字體的標題。我怎樣才能調整標題的大小？

Answer 1

這可以是一個答案。

您可以指定theme(plot.title=element_text(size=9))，以便您的標題與其他標題的尺寸相同。

工作例如：

x <- seq(1,10,1) 
y <- dnorm(x,mean=10,sd=0.5) 

qplot(x,y) + theme(axis.text=element_text(size=9), 
         axis.title=element_text(size=9), 
         axis.line = element_line(size=0.25), 
         axis.ticks=element_line(size=0.25), 
         panel.grid.major = element_blank(), 
         panel.grid.minor = element_blank(), 
         panel.border = element_blank(), 
         panel.background = element_blank(), 
         legend.position="none" , 
         legend.direction="vertical", 
         legend.title=element_blank(), 
         legend.text=element_text(size=9), 
         legend.background=element_blank(), 
         legend.key=element_blank(), 
        plot.title=element_text(size=9))+ 
    labs(title='this',x='that',y='other') 

通知我加在主題的最後一行。我希望這有幫助。