如何在R中创建列表向量?

时间:2010-04-12 19:28:46

标签: r list vector

我有一个列表(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的向量,但是使用列表周围的这个额外列表来访问列表的元素非常麻烦。 (我认为,在一个句子中列出太多。)

任何帮助将不胜感激,
马丁

3 个答案:

答案 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"