r - 将函数应用于矩阵列表

Question

res_log <- lapply(res, log2)

res是 alist并且每个元素都是 a MATRIX。我得到了错误。

Error in match.fun(FUN) : '1' is not a function, character or symbol

Answer 1

如果要计算列表中所有矩阵值的以 2 为底的对数res，可以使用以下命令：

lapply(res, log2)

该命令apply(res, 1, log2)将不起作用，因为列表没有行。这只能与单个矩阵对象（或数组）一起使用。

一个例子：

res <- rep(list(matrix(1:9, 3)), 2)

# [[1]]
#      [,1] [,2] [,3]
# [1,]    1    4    7
# [2,]    2    5    8
# [3,]    3    6    9
# 
# [[2]]
#       [,1] [,2] [,3]
# [1,]    1    4    7
# [2,]    2    5    8
# [3,]    3    6    9


lapply(res, log2)

# [[1]]
#          [,1]     [,2]     [,3]
# [1,] 0.000000 2.000000 2.807355
# [2,] 1.000000 2.321928 3.000000
# [3,] 1.584963 2.584963 3.169925
# 
# [[2]]
#          [,1]     [,2]     [,3]
# [1,] 0.000000 2.000000 2.807355
# [2,] 1.000000 2.321928 3.000000
# [3,] 1.584963 2.584963 3.169925