GGplot如何给数据点添加数据标签

Question

如何使用ggplot给点添加数据标签？

我有一个名为“ stacked”的堆叠数据框：

 > head(stacked)
    time    value variable
 1  100 152.2211       gg
 2  110 146.3304       gg
 3  115 143.5831       gg
 4  120 140.9527       gg
 5  125 138.4297       gg
 6  130 136.0057       gg

 > tail(stacked)
      time    value variable
  755 1975 56.02922        t
  756 1980 56.14049        t
  757 1985 56.25148        t
  758 1990 56.36219        t
  759 1995 56.47262        t
  760 2000 56.58277        t

现在假设我想显示数据标签，显示“value”字段，其中时间字段等于100。以下是我的代码：

g<- ggplot(stacked, aes( x = time,  y=value, colour=variable, group= variable) )       +   geom_line()  +
 geom_text(data = stacked[stacked$time == 100,], aes(label = stacked$value))
print(g)

I am getting the error:

Error: Aesthetics must either be length one, or the same length as the dataProblems:time, value, variable, variable

有什么想法吗？

谢谢。

- user3022875

Answer 1

问题在于你的geom_text中的aes(...)调用中，你设置了label = stacked$value。你已经指定了数据子集(data = stacked[stacked$time == 100,])，因此在这里，你只需要设置aes(label = value)，使其使用value列即可。 我没有你的测试数据，但是请看这个例子，我只在速度为10的倍数的数据点上添加标签。

ggplot(cars, aes(x = speed, y = dist)) + 
    geom_point() + 
    geom_text(data = subset(cars, speed %% 5 == 0), aes(label = dist))

- sebkopf