Question

我绘制了以下数据框（x）：

  Position     S1     S2     S3     S4
1       53 0.0000 0.5000 0.0000 0.2000
2       54 0.2000 0.5000 0.0000 0.0000
3       55 0.0000 0.5000 0.1000 0.0000
4       56 0.0000 0.0000 0.1000 0.4000
5       57 0.2000 0.0000 0.0000 0.0000
6       58 0.0000 0.0000 0.2000 0.0000
7       59 0.3000 0.0000 0.1000 0.0000
8       60 0.0000 0.4000 0.0000 0.6000
9       61 0.0000 0.0000 0.0000 0.5000
10      62 0.0000 0.0000 0.1000 0.6000

并使用

添加文字

plot(x$S1, type="h")
text(x$S1)

但是，我只希望表中的值的文本高于阈值。所以我做了以下几点：

plot(x$S1, type="h")
y = x$S1
y[y<0.2] = NA
text(y)

这是我想要的。但是，理想情况下，我希望x轴值为x$Position，而不是仅从1开始递增。我可以用以下内容绘制：

plot(x$Position, x$S1, type="h")

但文本标签仍显示递增值，而不是x$Position的值。我已经尝试了很多方法来解决这个问题，但没有取得成功。

如何在图表中添加x$Position值作为文字，但仅限于高于阈值的x$S1值？

Answer 1

你想要这个吗？：

plot(x$Position, x$S1, type="h")
text(x$Position,y,labels=x$Position)

有选择地在图表上包含文本标签

1 个答案: