如何使用 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 中的其他常用函数: