注释

我们可以使用Kamil Slowikowski开发的ggrepel包来自动调整标签的位置，使它们免于重叠：

ggplot(mpg, aes(displ, hwy)) +
  geom_point(aes(colour = class)) +
  geom_point(size = 3, shape = 1, data = best_in_class) +
  ggrepel::geom_label_repel(aes(label = model), data = best_in_class)

注意，我们还做了另一项很贴心的改动：添加了一个图层，用较大的空心圆来强调添加了标签的数据点。