在R中的多个嵌套列表内的复杂数据框内设置列的子集

，可以通过以下步骤实现：

1. 首先，我们需要访问到嵌套列表中的数据框。可以使用双重方括号（[[]]）或者$符号来访问列表中的元素。例如，如果列表名为my_list，要访问第一个数据框，可以使用my_list[[1]]或my_list$df1。
2. 接下来，我们可以使用dplyr包中的select()函数来选择需要的列。select()函数可以通过列名或者列索引来选择列。例如，如果我们要选择数据框中的第一列和第三列，可以使用select(df, 1, 3)或者select(df, col1, col3)。
3. 如果需要在多个嵌套列表中设置列的子集，可以使用lapply()函数来遍历列表，并在每个数据框中应用select()函数。例如，如果列表名为nested_list，要选择每个数据框中的第一列和第三列，可以使用以下代码：

new_list <- lapply(nested_list, function(df) {
  select(df, 1, 3)
})

在上述代码中，lapply()函数会遍历nested_list中的每个数据框，并在每个数据框中应用select()函数来选择第一列和第三列。最终，返回一个新的列表new_list，其中包含了每个数据框的子集。

需要注意的是，上述代码中使用了dplyr包中的select()函数来选择列。如果你不熟悉dplyr包，也可以使用base R中的subset()函数来实现相同的功能。subset()函数的用法类似于select()函数，只是语法略有不同。

希望以上解答能够满足您的需求。如果您需要更多帮助，请随时提问。