R：子集数据框时省略未定义的列

Question

我有一个包含300多个列的数据框df1，并且我试图基于list1中的几十个输入，通过列名将其子集为df2。 但是，list1中的某些项目实际上不是df1中的列名称。 因此，出现“未定义的列”错误：

df2 <-df1 [，list1]
[.data.frame （df1，，list1）中的错误：
未定义的列已选择

我知道发生此错误的原因。 但是我无法通过list1来查看哪些出现在df1中，哪些没有。 因为我必须用很多不同的列表来做很多次。 有没有一种方法可以简单地忽略这些值（而不在子集df2中不包含list1中的那些空列名值）？

感谢您的帮助。

Answer 1

怎么样： df2 <- df1[,list1[list1 %in% names(df1)]]

Answer 2

我希望自己使用更好或更短的解决方案。 这是另一个

df1[,intersect(names(df1), list1)]