如何在散点图中标记特定点

Question

我有一个使用此set.seed(1) df <- data.frame(a=sample(1:10,10), b = sample(1:10,10),ID = sample(letters[1:10])) 的散点图：

ID [1:5]

我只想标记plot(a~b,data = df) with(df,text(a~b, labels = ID [1:5])) 的分数。

我尝试了下面的代码，但仍然标记了所有代码

var result = filteredLine
        .GroupBy(c => c.Fid)
        .Select(g => new ElmLine()
        {
            Id = g.Key,
            CoordList = g
                .Select(c => { c.CoordX, c.CoordY })
                .Distinct()
                .Select(c => new CoordList() 
                        { XCord = c.CoordX, YCord = c.CoordY })
                .ToList(),
        }).ToList();

Answer 1

你可以做到

with(df[df$ID %in% df$ID[c(1:5)],],text(x = b, y = a, labels = ID, pos = 2))

Answer 2

我认为您只需要在with()中设置df，尝试

set.seed(1)    
df <- data.frame(a=sample(1:10,10), b = sample(1:10,10),ID = sample(letters[1:10]))
plot(a~b,data = df)
with(df[1:5,], text(a~b, labels = ID [1:5]))