r - 绘制分组连续变量与二进制变量

Question

我有一个连续响应变量和一个二元预测变量。但是，该二进制预测器也有两种形式(两个不同的年份)。我想创建一个箱线图，其中两年分开但在同一 x 变量列中。

这是一个像我这样的假设数据框设置

    Wingspan     Infected     Year
    15.3         1            2015
    14.9         1            2015
    15.9         0            2016  
    15.0         1            2016
    13.8         0            2015
    16.1         0            2016
    14.2         1            2015
    15.9         1            2015 
    13.7         0            2016
    16.4         0            2016
    13.9         0            2016
    14.0         1            2015

我很容易通过做得到一个输出

    Model <- Wingspan ~ Infected
    plot(Model)

但是，我希望受感染的列每列有 2 个框，一个用于 2015 年，一个用于 2016 年。我尝试了各种函数来拆分数据，例如 split() 和各种绑定(bind)函数，但我做不到似乎以任何方式对这些数据进行分区并获得输出。任何想法将不胜感激。

Answer 1

这是你想要的吗:

require(read.so) #Awesome package by @Alistaire47
dat <- read.so()
require(ggplot2)

ggplot(dat, aes(as.character(Infected), Wingspan, color = as.character(Year))) + 
geom_point()
#I have used as.character in order to prevent R reading the numbers as , 
#... well... , numbers

编辑 1对于箱线图，只需将 geom_point() 更改为 geom_boxplot()...就这样:)

编辑2对于 base R 中的不同颜色，将以下内容添加到@thelatemail 的代码中:

boxplot(Wingspan ~ Infected + Year, data=dat, boxfill = dat$Year)
#again, try ggplot. Very rewarding, in terms of getting nice graphs.