如何保存列表中的特定元素？

Posted 2023-05-07

【中文标题】如何保存列表中的特定元素？

【英文标题】：How can I save a specific element from a list?

【发布时间】：2017-05-22 10:17:44

【问题描述】：

按照 *** 关于如何从矩阵中获取对角线向量的问题 (Get all diagonal vectors from matrix)，我在尝试保存其中一个元素时被卡住了。

A <- matrix(1:16, 4)
d <- row(A) - col(A)
d.chem <- split(A, d)
d.chem 
# $`-3`
# [1] 13
# 
# $`-2`
# [1]  9 14
# 
# $`-1`
# [1]  5 10 15
# 
# $`0`
# [1]  1  6 11 16
# 
# $`1`
# [1]  2  7 12
# 
# $`2`
# [1] 3 8
# 
# $`3`
# [1] 4

我只想保存这个元素：$-1。我该怎么做？ 我尝试了以下方法，但收到一条错误消息：

    lapply(d.chem, '[[', 3)
#Error in FUN(X[[i]], ...) : subscript out of bounds
    unlist(lapply(d.chem, '[[', 3))
#Error in FUN(X[[i]], ...) : subscript out of bounds

【参考方案1】：

你可以使用：

d.chem$`-1`

考虑使用 `` 符号来访问“-1”命名的列表成员。

【讨论】：

谢谢！那很简单！！！我也在尝试，但使用不同的符号。再次感谢

【参考方案2】：

您也可以通过索引d.chem[3] 访问该元素