代码之家 › 专栏 › 技术社区 › Jeremy Leipzig

如何使用矩阵生成ggplot中的箱线图

ggplot2 r

10

Jeremy Leipzig · 技术社区 · 16 年前

在R中,很容易将矩阵转换成箱线图。

> myMatrix
      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
 [1,]   27   32   31   28   20   28   10   29   15    29
 [2,]   31   33   20   28   21    9   14   21   34    33
 [3,]   27   33   28   23   26   33   19   11   26    30
 [4,]   33   17   10   31   10   32   10   29   31    28
 [5,]   25   10   29   34   32   33   28   32   32    32
 [6,]   32   19   13   32   26   20    9   26   32    33
 [7,]   33   32   18   26   27   28   29   32   24    25
 [8,]   33   34   32   30   27   31   22   32   33    30
 [9,]   32   34   31   22   17   31   11   27   18    23
[10,]   26   10   30   30   27    4    4    4    4     4

> boxplot(as.data.frame(myMatrix))

我如何在ggplot中完成相同的事情?

1 回复 | 直到 12 年前

1

8

momobo 12 年前

您可以使用melt()函数,然后使用geom_BoxPlot()。首先复制数据(感谢Excel):

vec <- c(c(27, 32, 31, 28, 20, 28, 10, 29, 15, 29), 
 + c(31, 33, 20, 28, 21, Â 9, 14, 21, 34, 33), 
 + c(27, 33, 28, 23, 26, 33, 19, 11, 26, 30), 
 + c(33, 17, 10, 31, 10, 32, 10, 29, 31, 28), 
 + c(25, 10, 29, 34, 32, 33, 28, 32, 32, 32), 
 + c(32, 19, 13, 32, 26, 20, Â 9, 26, 32, 33), 
 + c(33, 32, 18, 26, 27, 28, 29, 32, 24, 25), 
 + c(33, 34, 32, 30, 27, 31, 22, 32, 33, 30), 
 + c(32, 34, 31, 22, 17, 31, 11, 27, 18, 23), 
 + c(26, 10, 30, 30, 27, Â 4, Â 4, Â 4, Â 4,  4))
myMatrix <- matrix(data=vec, ncol=10, byrow=TRUE)

然后熔化并绘图:

library(reshape)
library(ggplot2)
ggplot(data=melt(as.data.frame(myMatrix)), aes(variable, value)) + geom_boxplot()

此外,正如哈德利(很久以前)在评论中建议的那样,不需要将矩阵转换为数据帧:

ggplot(data=melt(myMatrix), aes(as.factor(X2), value)) + geom_boxplot()