在base R中有没有一种快速的方法来根据操作相关器对数据帧进行子集？(例如MPG >20)

# 创建一个示例数据框
df <- data.frame(MPG = c(18, 20, 22, 25, 28),
                 Model = c("A", "B", "C", "D", "E"))

# 使用条件语句创建逻辑向量
subset <- df$MPG > 20

# 使用逻辑向量作为索引选择满足条件的行
subset_df <- df[subset, ]

# 打印结果
print(subset_df)

  MPG Model
3  22     C
4  25     D
5  28     E