Question

我有一个名为：nb.loop

的矩阵

nb.loop<-cbind(NB_evppi_Immediately_outer,NB_evppi_Watchfully_outer)

它只有两列，我需要找到每列的平均值（我知道你可以使用他的colMean函数，但不知道如何应用它）

类似的东西：

colMeans(nb.loop)
nb.loop <- 0:9

我使用此代码来确定列的最大值：

baseline <- max(colMeans(nb.loop))

但我不知道如何应用它来分别获取它们。而且，我如何只打印矩阵每列的前10个值？

感谢您的帮助

Answer 1

colMeans返回一个包含每列平均值的向量，例如：

nb.loop <- matrix(1:4,nrow=2)

> nb.loop
     [,1] [,2]
[1,]    1    3
[2,]    2    4

avgs <- colMeans(nb.loop)

> avgs 
[1] 1.5 3.5

要仅打印矩阵的前10行，您可以使用函数head，例如

nRowToPrint <- 10
print(head(nb.loop,nRowToPrint))

Answer 2

您可以使用apply（）在数组的各列上运行任何函数。

> nb.loop <- matrix(1:12, ncol = 2)
> nb.loop
     [,1] [,2]
[1,]    1    7
[2,]    2    8
[3,]    3    9
[4,]    4   10
[5,]    5   11
[6,]    6   12

例如，找到手段：

> apply(nb.loop, 2, mean)
[1] 3.5 9.5

要查找最大值（也在原始帖子中提到）：

> apply(nb.loop, 2, max)
[1]  6 12

打印矩阵的第一个值并找到平均值

2 个答案: