【发布时间】:2017-05-22 10:17:44
【问题描述】:
按照 Stackoverflow 关于如何从矩阵中获取对角线向量的问题 (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
【问题讨论】:
标签: r list split save elements