如何在 R 中操作 ggplot2 facet 网格文本大小？

在本文中，我们将研究使用 R 编程语言从 ggplot2 包中更改刻面网格文本大小的方法。

我们将使用主题（）函数，再使用此函数的strip.text.x = element_text（大小）的说法，用户需要输入需要按照用户需求的大小值，这里的用户有一个选项增加或减少分面网格文本大小的大小，因为大小值大于 10 将增加文本大小，而小于 10 的大小值将减小分面网格文本的大小。

让我们首先，不加任何修改地绘制图形。这样，区别就很明显了。

例子：

R

library("ggplot2")   
  
gfg_data<-data.frame(x=c(1,2,3,4,5),y=c(5,4,3,2,1))
  
gfg_plot<-ggplot(data=gfg_data, aes(x, y)) + 
  geom_bar(stat="identity")+facet_grid(. ~ c('A','B','C','D','E'))
  
gfg_plot

输出：

现在让我们使用 theme()函数并创建一个改变了刻面网格文本大小的图形。

theme()函数是一种自定义绘图的非数据组件的强大方法：即标题、标签、字体、背景、网格线和图例。

Syntax:

theme(line,rect,text,title,aspect.ratio,strip.text, …, validate = TRUE)

Parameters:

• line: all line elements (element_line())
• rect : all rectangular elements (element_rect())
• text  :all text elements (element_text())
• title : all title elements: plot, axes, legends (element_text(); inherits from text)
• aspect.ratio  : aspect ratio of the panel
• strip.text, strip.text.x, strip.text.y  : facet labels (element_text(); inherits from text). Horizontal facet labels (strip.text.x) & vertical facet labels (strip.text.y) inherit from strip.text or can be specified separately

让我们首先增加文本大小。

示例 1：

电阻

library("ggplot2")   
  
gfg_data<-data.frame(x=c(1,2,3,4,5),y=c(5,4,3,2,1))
  
gfg_plot<-ggplot(data=gfg_data, aes(x, y)) + 
geom_bar(stat="identity")+facet_grid(. ~ c('A','B','C','D','E'))+
theme(strip.text.x = element_text(size = 30))
  
gfg_plot

输出：

现在让我们减小尺寸。

示例 2：

电阻

library("ggplot2") 
  
gfg_data<-data.frame(x=c(1,2,3,4,5),y=c(5,4,3,2,1))
  
gfg_plot<-ggplot(data=gfg_data, aes(x, y)) + geom_bar(stat="identity")+
facet_grid(. ~ c('A','B','C','D','E'))+
theme(strip.text.x = element_text(size = 5))
  
gfg_plot

输出：