r - 如何用标签和用户指定的颜色标记图中的每个数据点？

Question

我有以下二维数据点，第一列是数据ID

ID    V1              V2
1   -9.2523712  1.751943612
2   -0.9799493  0.067998776
3   -0.9799493  0.067998776
4   3.2156859   1.088934239
5   3.4915597   1.097911743
6   3.4915597   1.097911743
7   -0.9799493  0.067998776
8   -0.9799493  0.067998776
9   -0.9799493  0.067998776
10  3.2156859   1.088934239

假设这个数组被命名为fit，我将这些点绘制为plot(fit[,2],fit[,3])但是，是否可以在图上用其 ID 标记每个点？另外，对于一些特定的点，比如 ID 10，我想用红色标记它。我怎么能在 R 中做到这一点？

Answer 1

在你的 plot 命令之后，使用以下命令：

text(x=fit[, 2], y=fit[, 3], labels=fit[, 1])
points(x=fit[fit$ID==10, 2], y=fit[fit$ID==10, 3], col="red")

话虽这么说，在ggplot中更好

Answer 2

尝试抖动letters[i]用于标记第 i 个点的点，并将其叠加在红色辐条显示多重性的向日葵图上。我们可以使用随机种子和抖动参数来调整它。从图中可以看出，点 a 没有重叠点，但在底部附近有五个重叠点（b、c、g、h、i），在右侧附近有四个重叠点（d、e、f、j） .

set.seed(19)
fitj <- transform(fit, V1 = jitter(V1, 10), V2 = jitter(V2), 10)
with(fit, sunflowerplot(V1, V2))
with(fitj, text(V1, V2, letters[1:10]))