R 语言散点图

散点图

从 Plot 一章中，您了解到 Plot 章节 函数用于标绘。

"散点图" 是一种用于显示两个数值变量之间关系的图，并为每次观测绘制一个点。

它需要两个长度相同的向量，一个用于 x-轴（水平），一个用于 y-轴（垂直）:

实例

bitmap(file="out.png")
x <- c(5,7,8,7,2,2,9,4,11,12,9,6)
y <- c(99,86,87,88,111,103,87,94,78,77,85,86)
plot(x, y)

结果如下:

上面例子中的观察结果应该显示 12 辆汽车经过的结果。

对于第一次看到图表的人来说，这可能不太清楚，所以让我们添加一个标题和不同的标签，以便更好地描述散点图:

实例

bitmap(file="out.png")
x <- c(5,7,8,7,2,2,9,4,11,12,9,6)
y <- c(99,86,87,88,111,103,87,94,78,77,85,86)
plot(x, y, main="Observation of Cars", xlab="Car age", ylab="Car speed")

结果如下:

总而言之，上面例子中的观察结果是 12 辆汽车经过的结果。

x-轴 显示这辆车有多旧。

y-轴 显示汽车经过时的速度。

观察结果之间有关系吗？

看起来车越新，开得越快，但这可能是巧合，毕竟我们只注册了 12 辆车。

对比绘制

在上面的例子中，车速和年龄之间似乎存在关系，但如果我们也绘制另一天的观察结果呢？散点图能告诉我们一些别的吗？

要将绘图与另一个绘图进行比较，请使用 points() 函数:

实例

在同一个图形上画两个图:

bitmap(file="out.png")
# day one, the age and speed of 12 cars:
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)
# day two, the age and speed of 15 cars:
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)
plot(x1, y1, main="Observation of Cars", xlab="Car age", ylab="Car speed", col="red", cex=2)
points(x2, y2, col="blue", cex=2)

结果如下:

观察结论：通过比较这两个标绘，我认为可以肯定地说，它们都给了我们相同的结论：车越新，开得越快。