在ggplot2图中添加一个额外的点

Fri*_*ten 5 r ggplot2

我用ggplot2创建了Sepal.Length和Sepal.Width(使用虹膜数据集)的图.

  ggplot(iris, aes(x = Sepal.Width, y = Sepal.Length, col = Species)) + geom_point()
Run Code Online (Sandbox Code Playgroud)

工作正常,但现在我想在图表中添加一个单独的蓝色点.例如:

  df = data.frame(Sepal.Width = 5.6, Sepal.Length = 3.9) 
Run Code Online (Sandbox Code Playgroud)

有关如何实现这一目标的任何想法?

zx8*_*754 12

使用注释

ggplot(iris, aes(x = Sepal.Width, y = Sepal.Length, col = Species)) + 
  geom_point() +
  annotate("point", x = 5.6, y = 3.9, colour = "blue")
Run Code Online (Sandbox Code Playgroud)


bee*_*oot 9

添加另一个图层:

ggplot(iris, aes(x = Sepal.Width, y = Sepal.Length, col = Species)) + 
  geom_point() +
  geom_point(aes(x=5.6, y=3.9), colour="blue")
Run Code Online (Sandbox Code Playgroud)

  • 我怀疑这会在同一位置绘制与绘制的点数量一样多的点。我有 710 万个整数,与“annotate”相比,这使绘图生成速度减慢了大约 30 秒!使用“geom_text”尝试此操作会减慢速度,文本不断闪烁,就像被重新绘制一样。 (4认同)

raw*_*awr 8

library('ggplot2')

df = data.frame(Sepal.Width = 5.6, Sepal.Length = 3.9) 

ggplot(iris, aes(x = Sepal.Width, y = Sepal.Length, col = Species)) +
  geom_point() +
  geom_point(data = df, col = 'blue')
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述