选择包含高于阈值的值的列

Question

我有以下数据集

df<-data.frame(c(1,2,1),c(2,1,3), c(1,3,4))

假设我要选择包含等于或大于3的值的列（即第2列和第3列）

我设法使用df >= 3找到逻辑参数并使用which(df>=3)进行索引，但我很难选择列。

Answer 1

Filter seems like a good option here:

df <- data.frame(x = c(1,2,1), y = c(2,1,3), z = c(1,3,4))

Filter(
  function(x) max(x) >= 3,
  df
  )