我在单个图中制作mutliple boxplots遇到了真正的麻烦...我有五个变量三个是数字,两个是因子。传奇应包含MM,ND和BB的缩写。
Group Class Sal Wal Daa
MM Low 21 34 4
ND Low 23 65 3
BB High 21 34 2
MM High 25 23 4
MM High 23 23 5
MM High 13 54 6
MM High 56 32 4
MM Low 34 13 3
ND Low 12 35 7
ND Low 34 34 2
ND Low 54 54 1
ND High 32 34 6
ND High 43 32 7
BB Low 54 13 3
BB Low 12 56 2
BB Low 45 34 6
BB High 32 32 3
BB High 13 12 2
BB High 54 12 5
如果要为每个数字变量拥有一组单独的盒子图,则可以使用 interaction()
函数按组和类别组:
test.data <- data.frame(Sal=rnorm(100),
group=factor(sample(LETTERS[1:3], 100, replace=TRUE)),
class=factor(sample(c("low","high"), 100, replace=TRUE)))
boxplot(Sal ~ interaction(group,class), data=test.data)
您需要先重新排列数据:
dta <- read.table(text="Group Class Sal Wal Daa
MM Low 21 34 4
ND Low 23 65 3
BB High 21 34 2
MM High 25 23 4
MM High 23 23 5
MM High 13 54 6
MM High 56 32 4
MM Low 34 13 3
ND Low 12 35 7
ND Low 34 34 2
ND Low 54 54 1
ND High 32 34 6
ND High 43 32 7
BB Low 54 13 3
BB Low 12 56 2
BB Low 45 34 6
BB High 32 32 3
BB High 13 12 2
BB High 54 12 5", header=TRUE)
dtaLong <- stack(dta, select=cbind(Sal, Wal, Daa))
dtaLong <- data.frame(dtaLong, dta[,1:2])
现在,IND是一个新因素,从原始数据集中的三个变量中识别值。
。library(lattice)
bwplot(values~ind | Group + Class, data=dtaLong)