将数据添加到列表元素

Question

我有一个坐标列表，其中x坐标位于[,1]，y坐标位于[,2]（下面的示例数据）。当我在使用R中的列表时，我想知道如何添加第三个＆＃34;列＆＃34;到列表。

我尝试使用test.route[[1]][[1]]，test.route[[1]][[2]]访问列表中的元素，但我无法这样做。

举个例子，如何在[,3]的{​​{1}}中添加一列零？

test.route

Answer 1

我们可以使用rapply浏览嵌套的list并创建一列

test.route1 <- rapply(test.route, function(x) cbind(x,  0), how = "list")
str(test.route1)
#List of 1
# $ :List of 1
#   ..$ :List of 1
#  .. ..$ : num [1:33, 1:3] -79.9 -79.9 -79.9 -79.9 -79.9 ...