我正在使用包skimr
来汇总所有逻辑数据,因此自然地我希望按均值从大到小对结果进行排序。
我已经尝试过将drillyr的脱脂功能传递给arrange
,但这没有用。
我们只是在都是布尔/逻辑的数据帧上使用skim
函数。
我尝试过,似乎一切都按预期工作:
set.seed(123)
df <- data.frame(a = sample(c(T,F), 50, replace = TRUE),
b = c(rep(F,25), sample(c(T,F), 25, replace = TRUE)),
c = c(rep(T,25), sample(c(T,F), 25, replace = TRUE)))
sdf <- skimr::skim(df) %>%
dplyr::filter(stat == "mean") %>% dplyr::arrange(desc(value))
sdf
输出
variable type stat level value formatted
<chr> <chr> <chr> <chr> <dbl> <chr>
1 c logical mean .all 0.8 0.8
2 a logical mean .all 0.5 0.5
3 b logical mean .all 0.26 0.26
我不知道您的问题是什么。仔细检查您的代码。