如何使用循环创建矩阵或结果列表？

Question

我正在执行一个循环来计算 4 个表达式的值。我的循环是：

for (i in c(1:14)){
 VV1a <- round((db$Ya1[i]^Comb$Sigma)+ (1/(exp(log(1/p1a)^Comb$Alpha)))*
                       ((db$Xa1[i]^Comb$Sigma)-(db$Ya1[i]^Comb$Sigma)),1)
 VV1b <- round((db$Yb1[i]^Comb$Sigma)+ (1/(exp(log(1/p1b)^Comb$Alpha)))*
                       ((db$Xb1[i]^Comb$Sigma)-(db$Yb1[i]^Comb$Sigma)),1)
 VV2a <- round((db$Ya2[i]^Comb$Sigma)+ (1/(exp(log(1/p2a)^Comb$Alpha)))*
                       ((db$Xa2[i]^Comb$Sigma)-(db$Ya2[i]^Comb$Sigma)),1)
 VV2b <- round((db$Yb2[i]^Comb$Sigma)+ (1/(exp(log(1/p2b)^Comb$Alpha)))*
                       ((db$Xb2[i]^Comb$Sigma)-(db$Yb2[i]^Comb$Sigma)),1)
 
 }

现在对于每个单数，我有 2105401 个值。但是，每次 R 覆盖元素时使用此语句（当然）。最后，我的元素 (VV1a, ....) 只包含最后一个循环（即 i = 14）。

如何保留所有计算？更具体地说：理想情况下，对于每一个，我都希望有一个计算值的向量。

Answer 1

使用list()。

假设您对 VV1a、VV1b 等进行不同的计算，您可以将每次迭代 i 的结果数组存储为列表。

results <- list()
for (i in c(1:14)){
 results[["VV1a"]][[i]] <- list(your_calculations_which_result_in_a_vector)
 ....
 
 }