W3School TIY Editor

# 我们需要这行代码才能在编译器中显示图表 png(filename="output.png") # 第一天，12 辆汽车的车龄和速度： x1 <- c(5,7,8,7,2,2,9,4,11,12,9,6) y1 <- c(99,86,87,88,111,103,87,94,78,77,85,86) # 第二天，15 辆汽车的车龄和速度： x2 <- c(2,2,8,1,15,8,12,9,7,3,11,4,7,14,12) y2 <- c(100,105,84,105,90,99,90,95,94,100,79,112,91,80,85) # 绘制第一天的数据，红色点，点的大小为 2： plot(x1, y1, main="Observation of Cars", xlab="Car age", ylab="Car speed", col="red", cex=2) # 在同一图中添加第二天的数据，蓝色点，点的大小为 2： points(x2, y2, col="blue", cex=2)