在 R 中更改绘图字体

在本文中，我们将研究在 R 编程语言中更改绘图字体的两种不同方法。

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

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

windowsFont()函数用于处理独立于设备的 R 图形字体系列名称到 Windows 字体描述的转换，并且仅在 Windows 上可用。

Syntax:

windowsFont(family)

Parameter:

• family: a character vector containing the font family name (“TT” as the first two characters indicate a TrueType font).

例子：

R

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))

输出：

方法 2：使用 ggplot2 中的 windowsFont() 和 theme()函数

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

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

Syntax:

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

Parameters:

• …: a list of element names, element pairings that modify the existing theme.
• complete: set this to TRUE if this is a complete theme, such as the one returned by theme_grey().
• validate: TRUE to run validate_element, FALSE to bypass checks.

例子：

电阻

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

输出：