我有一个列表(tmpList),如下所示:
$op
[1] "empty"
$termset
$termset$field
[1] "entry"
$termset[[2]]
$termset[[2]]$explode
[1] "Y"
这是一个列表,里面有一个列表。 如果我将此列表添加到矢量
theOneVector = c(theOneVector, tmpList)
现在结果向量的长度为2,因为列表的第一个条目(“op”)与tmpList分开。
是否可以将完整的tmpList附加到此向量中?
我已经尝试了
theOneVector = c(theOneVector, list(tmpList))
给出一个长度为1的向量,但是使用列表周围的这个额外列表来访问列表的元素非常麻烦。 (我认为,在一个句子中列出太多。)
任何帮助将不胜感激,
马丁
答案 0 :(得分:14)
您可以将矢量(所有组件必须属于同一类型的受限制结构)粘贴到列表中(不受限制)。
但你无法做到相反。使用列表列表列表......然后使用lapply等提取。
答案 1 :(得分:1)
表达式'c(theOneVector,list(tmpList))'实际上没有返回长度为1的向量,它返回一个列表(通过coersion),因为向量中的项必须都是相同的模式(数据)类型)。
您可以在R中创建一个容器来保存不同模式的项目并且其项目易于访问:
# create the container (an R 'list')
vx = vector(mode="list")
# create some items having different modes to put in it
item1 = 1:5
item2 = "another item"
item3 = 34
item4 = list(a = c(1:5), b = c(10:15))
# now fill the container
vx$item1 = item1
vx$item2 = item2
vx$item3 = item3
vx$item4 = item4
# access the items in the container by name:
vx$item1
# returns: [1] 4 5 6
vx$item2
# returns: [1] "another item"
答案 2 :(得分:0)
我认为list()
list()
就是你想要的。
以下是lapply()
的简单示例,其中显示了如何使用它们。请注意,lapply()
将应用为参数中给出的列表的每个元素提供的函数,并返回包含各个执行结果的列表。
> l1 = list(a = 10, b = 11)
> l2 = list(a = 20, b = 22)
> test_function <- function(l){
return(paste("a =", l$a, "b = ", l$b, "\n"))
}
# Do something to each element of the list
# (i.e.: apply a function test_function() using lapply()).
# This will return a list over which you can iterate.
# Each individual list l1 and l2 is "wrapped" into a single list: list(l1, l2)
> res = lapply(X = list(l1, l2), FUN = test_function)
> res
[[1]]
[1] "a = 10 b = 11 \n"
[[2]]
[1] "a = 20 b = 22 \n"
# First element of the results
> res[1]
[1] "a = 10 b = 11 \n"
# Second element of the results
> res[2]
[1] "a = 20 b = 22 \n"