我使用 for 循环编写了基于 8 个不同形状参数来模拟威 bool 值的代码。我想将其保存在 365 x 8 的矩阵中并最终导出到 csv。
我的代码是这样的:
k <- seq(1.4,2.8,0.2)
test <- matrix(rep(NA,365),nrow=365,ncol=8)
for (i in k){
wind.k <- mapply(rweibull,i,scale.k,MoreArgs=list(n=1))
test[ ]<-as.matrix(wind.k)
}
结果为 365 x8,但我注意到它仅捕获每列的 k=2。 谁能帮忙修复一下代码吗?
非常感谢您提前提供的帮助!
最佳答案
使用这个:
test <- matrix(rweibull(n=365*8, shape=k, scale=scale.k), nrow=365, ncol=8, byrow=TRUE)
请注意,scale.k
必须是长度为 8 的向量。
关于r - 使用 for 循环将威 bool 观测值保存在矩阵中,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/17116823/