R语言 使用plot绘制三个不同颜色折线图以x变量为横坐标以y变量为纵坐标以S变量为3个分组用不同颜色表示并且将三个图重合在一起自动取y轴的上下限值

可以使用以下代码来实现所需的功能：

# 创建示例数据
x <- 1:10
y <- c(2, 4, 6, 8, 10, 8, 6, 4, 2, 0)
S <- rep(1:3, each = 5)

# 绘制第一个折线图
plot(x, y, type = "n", ylim = range(y), xlim = range(x))
lines(x[S == 1], y[S == 1], col = "red")

# 绘制第二个折线图
lines(x[S == 2], y[S == 2], col = "green")

# 绘制第三个折线图
lines(x[S == 3], y[S == 3], col = "blue")

这段代码首先创建了示例数据，其中x为横坐标，y为纵坐标，S为分组变量。然后使用plot函数创建一个空白的坐标系，并设置了y轴的上下限值为y的范围。接下来使用lines函数分别绘制了三条折线图，其中根据S的取值来选择不同的颜色。将三个图重合在一起的效果是通过在同一个坐标系上不断添加新的线条实现的。