如何使用 r 中的 text() 函数向绘图添加文本

您可以使用text()函数将文本添加到 R 基础图中。

该函数使用以下基本语法：

文本（x，y，“我的文本”）

金子：

• x, y ：文本应放置的坐标 (x, y)。

以下示例展示了如何在实践中使用此功能。

示例 1：向路径添加文本元素

以下代码演示如何使用text()将文本元素添加到绘图中 (5, 18) 的 (x, y) 坐标处：

 #create data frame with values to plot
df <- data. frame (x=c(1, 4, 7, 8, 8, 10),
                 y=c(4, 9, 16, 14, 12, 20))

#create scatterplot
plot(df$x, df$y)

#add text element at (5, 18)
text(x= 5 , y= 18 , “ this is my text ”)

请注意，我们的文本元素已添加到图中 (5, 18) 的 (x, y) 坐标。

示例 2：向路径添加多个文本元素

要将多个文本元素添加到绘图中，我们可以简单地使用几个text()函数：

 #create data frame with values to plot
df <- data. frame (x=c(1, 4, 7, 8, 8, 10),
                 y=c(4, 9, 16, 14, 12, 20))

#create scatterplot
plot(df$x, df$y)

#add text elements
text(x= 5 , y= 18 , “ first text ”)
text(x= 5 , y= 10 , “ second text ”) 
text(x= 5 , y= 5 , “ third text ”) 

请注意，三个文本元素已添加到图中，每个元素位于我们指定的 (x, y) 坐标处。

示例 3：自定义图中的文本元素

我们可以使用cex 、 col和font参数分别自定义图中文本元素的大小、颜色和字体样式：

 #create data frame with values to plot
df <- data. frame (x=c(1, 4, 7, 8, 8, 10),
                 y=c(4, 9, 16, 14, 12, 20))

#create scatterplot
plot(df$x, df$y)

#add text elements with custom appearance
text(x= 5 , y= 18 , " first text ", col=' red ')
text(x= 5 , y= 10 , " second text ", col=' blue ', cex= 3 ) 
text(x= 5 , y= 5 , " third text ", col=' green ', cex= 5 , font= 3 ) 

请注意，三个文本元素中的每一个都具有自定义外观。

另请注意，字体参数有四个可能的值：

• 1 ：普通
• 2 ：脂肪
• 3 ：斜体
• 4 ：粗斜体

由于我们为第三个文本元素指定了font=3 ，因此字体为斜体。

示例 4：为每个路径点添加文本标签

我们可以使用labels参数为绘图上的每个点添加文本标签：

 #create data frame with values to plot
df <- data. frame (teams=c('A', 'B', 'C', 'D', 'E', 'F'),
                 x=c(1, 4, 7, 8, 8, 10),
                 y=c(4, 9, 16, 14, 12, 20))

#create scatterplot
plot(df$x, df$y)

#add text label to each point in plot
text(df$x, df$y, labels=df$teams, pos= 4 )

请注意，绘图上的每个点现在都有一个文本标签。

另请注意， pos参数控制文本标签相对于点的放置位置，并采用四个可能的值：

• 1 ：在文字下方
• 2 : 文本左侧
• 3 ：文字上方
• 4 ：文本法

由于我们指定pos=4，因此每个文本标签都放置在绘图点的右侧。

其他资源

以下教程解释了如何使用 R 中的其他常用函数：

如何在R中使用paste和paste0函数
如何在R中使用replace()函数
如何在 R 中使用 View() 函数