在R中，如何通过另一个数据框的列名删除一个数据框中的行？

Question

我有一个数据帧（df1），其中包含200多列数据（每列数千行）。列名是字母数字的，并且彼此不同。

我有第二个数据集（df2），其中包含几列，其中第一列（名为“col1”）包含带有“值”的行，这些行带有df1的列名。

但不是对于df2中的每一行，我在df1中具有对应的列。

现在，我想删除（删除）df2中没有“对应”列的所有行。

我用“子集data.frame另一个data.frame的值”这样的关键词搜索了很长时间，但没有找到任何解决办法。我查了一下，例如这里、这里或这里和其他一些地方。

谢谢你的帮助。

Answer 1

数据:

df1 <- data.frame(a = 1:3, b = 1:3)
#   a b
# 1 1 1
# 2 2 2
# 3 3 3

df2 <- data.frame(col1 = c("a", "c"))
#   col1
# 1    a
# 2    c

保留df2中的行，其值是df1中的名称：

subset(df2, col1 %in% names(df1))
#   col1
# 1    a