R语言如何使用for循环提取列表中以S21_027开头的元素

错误原因 #

你当前的for循环仅遍历单个值：length(order_col)返回的是列表的总长度（你给出的示例数据中该值为6），因此循环只会执行1次，自然仅能返回最后一个子列表的元素。

修正后的for循环实现 #

order_column <- c()
# 遍历所有列表下标，seq_along会生成和列表长度匹配的连续整数序列
for (i in seq_along(order_col)) {
  v <- order_col[[i]][1]
  # 正则匹配判断是否以S21_027开头
  if (grepl("^S21_027", v)) {
    # 新元素拼接到末尾，顺序和原列表一致；如果需要倒序就改成 c(v, order_column)
    order_column <- c(order_column, v)
  }
}

更简洁的向量化实现（无需显式写for循环） #

R作为面向向量的语言，你可以直接用向量化操作完成需求，代码更简洁高效：

# 先提取所有子列表的第一个元素，再过滤符合前缀要求的元素
order_column <- grep("^S21_027", sapply(order_col, `[[`, 1), value = TRUE)

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