在 R 中为两个因变量和一个自变量创建散点图。

要为两个因变量和一个自变量创建散点图，我们可以使用 ggplot2 包的 geom_point 函数和 geom_smooth 函数。这两个函数将被使用两次，我们可以为每个因变量定义绘图的美感，如下面的示例所示。

示例

以下代码段创建了一个示例数据框 -

x<-rnorm(20)
y1<-rnorm(20,5)
y2<-rnorm(20,10)
df<-data.frame(x,y1,y2)
df

创建以下数据框 -

            x       y1       y2
 1  2.4995751 5.515944 11.055437
 2 -0.6271148 6.234058 9.847844
 3  1.5572278 4.363662 10.305286
 4  0.7544594 4.660968 9.709750
 5 -0.3531405 5.896566 8.300061
 6  0.3516249 6.714057 10.735020
 7  0.4605740 4.955006 8.975519
 8  0.2999492 4.671082 10.373543
 9  1.0682999 4.590270 11.436856
10  0.2140709 5.163876 9.100128
11 -0.3508677 4.798086 9.221152
12  0.6303074 4.879782 10.123158
13 -1.0964767 4.678353 9.703888
14 -1.0814789 4.701568 10.983667
15  0.3777337 4.694484 11.089179
16  0.9787944 5.577403 8.935059
17 -0.2456083 6.365431 9.195587
18 -1.1495510 3.654495 7.648289
19  0.1903006 7.930433 11.254847
20  0.6788355 4.661313 11.421257

要加载 ggplot2 包并为在上述创建的数据框中只有一个自变量 x 的因变量 y1 和 y2 创建散点图，请将以下代码添加到上述代码段 -

x<-rnorm(20)
y1<-rnorm(20,5)
y2<-rnorm(20,10)
df<-data.frame(x,y1,y2)
library(ggplot2)

ggplot(df,aes(x,y1))+geom_point()+geom_smooth(method="lm")+geom_point(aes(x,y2)
)+geom_smooth(aes(x,y2),method="lm")
`geom_smooth()` using formula 'y ~ x'
`geom_smooth()` using formula 'y ~ x'

如果您将上述所有片段作为单个程序执行，它会生成以下输出 -