首页 > 解决方案 > 使用 lapply 后矩阵转换为列表。不打算

问题描述

很简单的问题。我有一个包含 DJ 索引返回的 29 个向量的列表“lRet”。对 29 只股票中的每只股票进行 270 次观察(一年中每天)

我有一个带有 7 个不同描述性统计数据的矩阵“DescStat”。

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

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[,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)

但我得到一个错误 dim(X) must have a positive length。

我做错了什么?

标签: rstatisticsfinance

解决方案


推荐阅读