将文本添加到 R 中的 ggplot2 绘图

在做数据可视化的时候，往往需要在图中添加文本来描述数据或者突出一些特别的信息。本文将介绍在 R 中使用 ggplot2 绘图时，如何添加文本。

添加标题

我们可以使用 ggtitle() 函数添加标题，如下所示：

ggplot(data = dot_plot, aes(x = carat)) +
  geom_dotplot(binaxis = "y", binwidth = 0.1, fill = "steelblue") +
  ggtitle("Diamond carat size distribution")

添加坐标轴标签

我们可以使用 xlab() 和 ylab() 函数添加 X 轴和 Y 轴的标签。如下所示：

ggplot(data = dot_plot, aes(x = carat)) +
  geom_dotplot(binaxis = "y", binwidth = 0.1, fill = "steelblue") +
  xlab("Carat") +
  ylab("Count")

添加注释

我们可以使用 annotate() 函数来添加注释。其中，参数 x 和 y 表示注释的位置，参数 label 表示注释内容。

ggplot(data = dot_plot, aes(x = carat)) +
  geom_dotplot(binaxis = "y", binwidth = 0.1, fill = "steelblue") +
  annotate("text", x = 0.8, y = 18, label = "Some text")

在图例中添加文本

我们可以使用 labs() 函数来修改默认的图例名称，并且可以设置文本格式。如下所示：

ggplot(data = mpg, aes(x = class, y = hwy)) +
  geom_boxplot(fill = "steelblue", alpha = 0.5) +
  labs(title = "Highway mpg by car class",
       x = "Car class",
       y = "Highway mpg",
       fill = "Transmission") +
  theme(legend.text=element_text(family="Arial", size=9, face="bold"))

小结

在 R 中使用 ggplot2 绘图时，添加文本是一个非常常见的需求。我们可以使用 ggtitle() 函数添加标题，使用 xlab() 和 ylab() 函数添加坐标轴标签，使用 annotate() 函数添加注释，使用 labs() 函数修改图例名称并改变文本格式。