在条件顶部添加标签。

Question

我有一个看起来像这样的条形图：

我需要将名称添加到栏的顶部。但我只想标记水平0.5线以上的名称。

我可以按如下方式添加标签：

 xx <- barplot(....)
 text(xx, data$features, labels=data$features, pos=3, offset=.5)

但这当然会增加所有价值。

Answer 1

怎么样：

set.seed(1)
y <- round(rnorm(10),1)
xx <- barplot(y)
yy <- y[y>.5]
xx <- xx[y>.5]
text(xx, yy, labels=yy, pos=3, offset=-1)