在rstudio中绘制具有不同颜色的一个大数据集的每个系列

Question

我有3列和22487行的大型数据集。 这是我的数据示例

Y X ID

1 3 A

2 4 A

3 5 A

1 2 B

3 6 B

7 6 C

8 5 C

第一列包含y值，第二列包含x值，第三列包含系列的名称，我想使用一个循环脚本绘制系列A，B和C，它们分别是用不同的颜色。问题是我的数据集中有很多序列，我创建了一些代码来使用sapply绘制所有代码，这些代码绘制得恰到好处，但是我希望它们使用不同的颜色。这是我之前编写的代码：

all <- mydataset 
L <- length(all$ID)
t <- all$X
d <- (all$Y)*(-1) //i want the y in reversed order
w <- all$ID

for(i in 1:L){
   if(w[i] != w[i+1])
  {
    sapply(all, plot(t,d))
  }
 }