在R语言中如何生成逐次累加元素的向量列表？

直接使用lapply即可实现需求，适配数值型、字符型等所有R基础向量类型，处理长向量时效率高，无需手动逐个定义：

核心实现代码 #

# input_vec替换为你的输入向量即可
finallist <- lapply(seq_along(input_vec), function(i) input_vec[1:i])

数值向量测试示例 #

# 输入数值向量
vec_numbers <- c(1, 2, 3, 4, 5)
finallist <- lapply(seq_along(vec_numbers), function(i) vec_numbers[1:i])

输出结果和要求完全一致：

• finallist[[1]] 对应 1
• finallist[[2]] 对应 c(1,2)
• 以此类推到第5个元素

字符向量测试示例 #

# 输入字符向量
vec_chars <- c("a", "b", "c", "d")
char_list <- lapply(seq_along(vec_chars), function(i) vec_chars[1:i])

输出结果自动适配字符类型：

• char_list[[3]] 对应 c("a","b","c")

可选：给列表元素命名 #

如果需要像手动定义的vec1、vec2一样按名称调用，可添加命名语句：

names(finallist) <- paste0("vec", seq_along(finallist))
# 调用示例：finallist$vec1

内容的提问来源于stack exchange，提问作者catabolic