R 使用lappy后，矩阵转换为列表。无意

非常简单的问题。我有一个列表，“lRet”，包含29个向量，包含来自DJ索引的返回。29只股票中的每只都观察了270次（一年中每天）

我有一个矩阵“DescStat”，包含7种不同的描述性统计数据

例如，我希望用平均值填充我的矩阵

DescStat <- matrix(0,29,7)

rownames(DescStat) <- mTicker$Symbol

colnames(DescStat) <- c("mean", "median", "variance", "kurtosis", "skewness", "rho", "rho2")



> head(DescStat)
    mean median variance kurtosis skewness rho rho2
TRV    0      0        0        0        0   0    0
XOM    0      0        0        0        0   0    0
V      0      0        0        0        0   0    0
PFE    0      0        0        0        0   0    0
CAT    0      0        0        0        0   0    0
IBM    0      0        0        0        0   0    0

---

DescStat
lappy
返回一个
列表
，您希望用
列表
填充矩阵的一列，这是不常见的。也许你需要
sapply
或
vapply
来代替（不知道
lRet
是什么，很难说清楚）。“sapply”我需要什么。lRet是29个矢量/系列BTW的列表，可能重复
DescStat[,1] <- lapply(lRet, mean)

head(DescStat)

> DescStat[,1] <- lapply(lRet, mean)
> head(DescStat)
[[1]]
[1] 0.03633877

[[2]]
[1] -0.02521246

[[3]]
[1] 0.09549176

[[4]]
[1] 0.01092361

DescStat[,1] <- apply(lRet, 2, mean)