R列表获取每个元素的第一项答案

【问题标题】：R list get first item of each elementR列表获取每个元素的第一项
【发布时间】：2017-05-25 09:25:33
【问题描述】：

这对某人来说应该很容易回答，但我在任何地方都没有成功找到答案。

我正在尝试从 R 中的列表返回列表中每个元素的第一项。

> a
[1] 1 2 3
> b
[1] 11 22 33
> c
[1] 111 222 333
> d <- list(a = a,b = b,c = c)
> d
$a
[1] 1 2 3

$b
[1] 11 22 33

$c
[1] 111 222 333

基于我上面的列表d的构造，我想返回一个包含三个值的向量：

return  1 11 111

【问题讨论】：

标签： r list

【解决方案1】：

sapply(d, "[[", 1) 应该可以解决问题。

一点解释：

sapply：遍历列表中的元素
[[：是子集函数。所以我们要求 sapply 在每个列表元素上使用子集函数。
1 : 是传递给 "[["

的参数

事实证明，“[”或“[[”可以以传统方式调用，这可能有助于说明这一点：

x <- 10:1
"["(x, 3)
 # [1] 8

【讨论】：

【解决方案2】：

你可以的

 output <- sapply(d, function(x) x[1])

如果你不需要名字

 names(output) <- NULL

【讨论】：