R语言改变绘图的字体

在这篇文章中，我们将看到两种不同的方法来改变R编程语言中绘图的字体。

方法1 ：使用windowsFont()函数和家族参数

在这种方法中，用户需要调用windowsFont()函数，它是R编程语言的内置函数之一，以字体名称为参数，该函数用于根据要求指定字体家族，因此，用户还需要使用plot()函数的family参数来改变R编程语言中绘图文本的字体家族。

windowsFont() 函数用于处理将独立于设备的R图形字体家族名称转换为Windows字体描述，仅在Windows上可用。

语法

windowsFont(family)

参数

family：一个包含字体家族名称的字符向量（”TT “作为前两个字符表示TrueType字体）。

例子

sample1_x <- c(1, 8, 5, 3, 8, 7)                
sample1_y <- c(4, 6, 3, 8, 2, 7)
  
windowsFonts(A = windowsFont("Rockwell"))  
  
plot(sample1_x, sample1_y, family = "A", cex=.8, pch=1, 
     col="red", main="Plot to show font Change")
  
sample2_x<-c(4, 5, 8, 6, 4)
sample2_y<-c(9, 8, 2, 3, 1)
sample3_x<-c(2, 1, 6, 7, 4)
sample3_y<-c(7, 9, 1, 5, 2)
  
points(sample2_x, sample2_y, cex=.8, pch=2, col="blue")
points(sample3_x, sample3_y, cex=.8, pch=3, col="green")
  
legend("topright", c("gfg1", "gfg2", "gfg3"),
       cex=1, col=c("red", "blue", "green"), pch=c(1, 2, 3))

输出

在R语言中改变绘图的字体

方法2：从ggplot2中唱windowsFont()和theme()函数

在这个方法中，为了改变给定绘图的字体，用户首先需要安装并导入ggplot2包，然后调用windowsFont()函数来指定所需的参数作为其参数，其次需要调用ggplot2包中的theme()函数来改变给定ggplot2绘图的字体。

theme() 函数用于修改主题设置。

语法

theme(…, complete = FALSE, validate = TRUE)

参数

…：一个元素名称的列表，修改现有主题的元素配对。
complete：如果这是一个完整的主题，例如由theme_grey()返回的主题，则将其设置为TRUE。
validate：TRUE表示运行validate_element，FALSE表示绕过检查。

例子

library("ggplot2")   
  
gfg_data<-data.frame(x_values=c(1, 2, 3, 4, 5), y_values=c(5, 4, 3, 2, 1))
  
windowsFonts(A = windowsFont("Times New Roman"))  
  
gfg_plot<-ggplot(data=gfg_data, aes(x_values, y_values)) +
  geom_bar(stat="identity")+ ggtitle("Plot to show font change")+
  theme(text = element_text(family = "A"))
  
gfg_plot

输出

在R语言中改变绘图的字体