如何在R语言中按指定周期规则移除列表中的data frames

假设你的原始列表名为original_list，包含480个data frame元素，要实现每保留32个元素后移除接下来的16个，可按以下步骤操作：

方法一：生成要删除的索引后过滤 #

首先明确周期规律：每32个保留元素 + 16个待删元素 = 48个元素为一个完整周期，480正好是10个完整周期。通过循环生成所有需要删除的索引区间：

# 生成所有要删除的索引
delete_indices <- unlist(lapply(0:9, function(x) (33 + 48*x):(48 + 48*x)))
# 过滤列表，保留非删除索引的元素
filtered_list <- original_list[-delete_indices]

方法二：直接生成要保留的索引 #

也可以直接定位需要保留的元素索引，每周期取前32个：

# 生成所有要保留的索引
keep_indices <- unlist(lapply(0:9, function(x) (1 + 48*x):(32 + 48*x)))
# 提取保留的元素
filtered_list <- original_list[keep_indices]

结果验证 #

执行完代码后，用length(filtered_list)检查结果，返回值应为320（32*10），符合预期。

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