如何找到存储在 R 列表中的所有矩阵的均值?
若想找到存储在 R 列表中的所有矩阵的均值,我们可以使用 sapply 函数和 mean 函数。例如,如果我们有一个包含一些矩阵的列表 LIST,那么可以使用以下命令找到每个矩阵的均值 −
sapply(LIST,mean)
查看以下示例,了解其工作原理。
示例
以下代码片段创建了一组矩阵 −
M1<-matrix(rpois(40,5),ncol=2) M2<-matrix(rpois(40,1),ncol=2) M3<-matrix(rpois(40,10),ncol=2) List<-list(M1,M2,M3) List
创建了以下矩阵 −
[[1]] [,1][,2] [1,] 3 3 [2,] 5 2 [3,] 2 4 [4,] 2 6 [5,] 3 7 [6,] 5 4 [7,] 5 3 [8,] 3 7 [9,] 2 5 [10,] 4 3 [11,] 8 2 [12,] 3 6 [13,] 7 5 [14,] 3 2 [15,] 11 7 [16,] 4 4 [17,] 6 8 [18,] 3 4 [19,] 8 8 [20,] 6 4 [[2]] [,1][,2] [1,] 0 0 [2,] 1 3 [3,] 0 1 [4,] 3 0 [5,] 0 2 [6,] 1 3 [7,] 0 1 [8,] 2 1 [9,] 1 2 [10,] 0 1 [11,] 1 1 [12,] 2 0 [13,] 3 1 [14,] 1 0 [15,] 1 0 [16,] 1 2 [17,] 0 1 [18,] 0 1 [19,] 0 1 [20,] 0 3 [[3]] [,1][,2] [1,] 21 8 [2,] 11 9 [3,] 15 11 [4,] 1 14 [5,] 11 5 [6,] 16 10 [7,] 7 10 [8,] 15 7 [9,] 12 11 [10,] 7 12 [11,] 6 13 [12,] 14 3 [13,] 7 12 [14,] 10 11 [15,] 12 7 [16,] 14 13 [17,] 9 12 [18,] 14 11 [19,] 8 14 [20,] 5 11
若想找到存储在列表中的矩阵的均值,请将以下代码添加到上面的代码片段 −
M1<-matrix(rpois(40,5),ncol=2) M2<-matrix(rpois(40,1),ncol=2) M3<-matrix(rpois(40,10),ncol=2) List<-list(M1,M2,M3) sapply(List,mean)
输出
如果你将以上所有代码片段作为一个程序执行,它将生成以下输出 −
[1] 4.675 1.025 10.475
广告