r - 有没有办法命名列表的所有元素

Question

有没有办法使用数组 element_names 中的名称来命名列表的所有元素。

element_names <- c("A", "B", "C", "D", "E")

x <- list()
for (iter in 1:5) {
  x[[iter]] <- seq(1, iter)
}

Answer 1

您可以使用 Map 和 setNames 更简洁地完成此操作。

x <- setNames(Map(seq, 1:5), element_names)
x
# $A
# [1] 1
# 
# $B
# [1] 1 2
# 
# $C
# [1] 1 2 3
# 
# $D
# [1] 1 2 3 4
# 
# $E
# [1] 1 2 3 4 5

或者，使用新管道:

Map(seq, 1:5) |> setNames(element_names)