我如何 select R-DataFrame 中第三个四分位数以上的数据

Question

我想要 select 个案例，其中某些变量的值高于相应的第三个四分位数 (3)

由于我的数据集非常大，我将以 R 中的 'Air Quality' 数据库为例。

df <- airquality[complete.cases(airquality),]

objective 是按某些列过滤 ('Ozone', 'Solar.R', 'Wind', 'Temp').

目前我能够开发这个解决方案：

filtro_Ozone = df$Ozone>quantile(df$Ozone)[4]
filtro_Solar.R = df$Solar.R>quantile(df$Solar.R)[4]
filtro_Wind = df$Wind>quantile(df$Wind)[4]
filtro_Temp = df$Temp>quantile(df$Temp)[4]

df[filtro_Ozone & filtro_Solar.R & filtro_Wind & filtro_Temp,]

我得到：

   Ozone Solar.R Wind Temp Month Day
40    71     291 13.8   90     6   9

另一种更有趣的方式？

Answer 1

更新：根据 OP 的更新请求，您可以使用 dplyr 中的 filter_at 来仅过滤选定的变量：

df <- airquality[complete.cases(airquality),]
filter_at(df, vars(Ozone, Solar.R, Wind, Temp), ~. > quantile(., probs = 0.75))

我如何 select R-DataFrame 中第三个四分位数以上的数据

How I can select data that is above the third quartile in a R-DataFrame

r

dataframe

quantile