多个列表结合了 R 中的错​​误

multiple lists combines errors in R

我有多个列表想要合并,但得到了错误的结果

我使用的代码

hiv.Scatter <- list(predictions = predictdata, labels = L)

for (k in 1:2){
  hiv.Scatter <-
    list(predictions = append(
      list(hiv.Scatter$predictions),
      list(predictdata)
    ),
    labels = append(list(hiv.Scatter$labels), list(L)))
}

但是使用上面的代码,我得到了很奇怪的结果

我预期的结果是:

> str(hiv.Scatter)
List of 2
 $ predictions:List of 3
  ..$ : num [1:6] 0.0287 0.00648 0.00926 0.04352 0.01296 ...
  ..$ : num [1:6] 0.0287 0.00648 0.00926 0.04352 0.01296 ...
  ..$ : num [1:6] 0.0287 0.00648 0.00926 0.04352 0.01296 ...
 $ labels     :List of 3
  ..$ : num [1:6] 1 1 1 1 1 1
  ..$ : num [1:6] 1 1 1 1 1 1
  ..$ : num [1:6] 1 1 1 1 1 1

我使用的数据

> dput(L)
c(1, 1, 1, 1, 1, 1)
> dput(predictdata)
c(0.0287037037037037, 0.00648148148148148, 0.00925925925925926, 
0.0435185185185185, 0.012962962962963, 0.00833333333333333)

感谢您的帮助

看到这个,

hiv.Scatter <- list(predictions = list(predictions = predictdata),
                    labels = list(labels = L))    
for (k in 1:2){
  hiv.Scatter[[1]] <- append(hiv.Scatter[[1]], 
                                    list(predictions = predictdata))
  hiv.Scatter[[2]] <- append(hiv.Scatter[[2]], list(labels = L))
}

或者,这个

hiv.Scatter <- list(predictions = list(predictions = predictdata),  
                    labels = list(labels = L))

for (k in 1:2){
  hiv.Scatter$predictions <- append(hiv.Scatter$predictions, 
                             list(predictions = predictdata))
  hiv.Scatter$labels <- append(hiv.Scatter$labels, list(labels = L))
}

这似乎给出了所需的输出

str(hiv.Scatter)
# List of 2
# $ predictions:List of 3
# ..$ predictions: num [1:6] 0.0287 0.00648 0.00926 0.04352 0.01296 ...
# ..$ predictions: num [1:6] 0.0287 0.00648 0.00926 0.04352 0.01296 ...
# ..$ predictions: num [1:6] 0.0287 0.00648 0.00926 0.04352 0.01296 ...
# $ labels          :List of 3
# ..$ labels: num [1:6] 1 1 1 1 1 1
# ..$ labels: num [1:6] 1 1 1 1 1 1
# ..$ labels: num [1:6] 1 1 1 1 1 1