如何將這兩個代碼合二為一而不是將它們分開？它們運行良好，但我希望將它們合并為一個代碼。也就是說，按任務和部門計算生產總數及其平均值。
df %>%
group_by(task, department) %>%
summarise(across(.cols = c(production),
.fns = sum,
na.rm=T))
df %>%
group_by(task, department) %>%
summarise(across(.cols = c(hours),
.fns = mean,
na.rm=T))
uj5u.com熱心網友回復：
你可以把它們放在一個串列中。這是一個使用示例mtcars（因為您沒有提供資料示例）。它會將相同的內容轉換為您的代碼。
mtcars %>%
group_by(cyl, carb) %>%
summarise(across(c(mpg, disp), list(mean = mean, median = median)))
cyl carb mpg_mean mpg_median disp_mean disp_median
<dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
1 4 1 27.6 27.3 91.4 79
2 4 2 25.9 25.2 117. 121.
3 6 1 19.8 19.8 242. 242.
4 6 4 19.8 20.1 164. 164.
5 6 6 19.7 19.7 145 145
6 8 2 17.2 17.1 346. 339
7 8 3 16.3 16.4 276. 276.
8 8 4 13.2 13.8 406. 400
9 8 8 15 15 301 301
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/324557.html
上一篇：使用NODEJS在Mongodb中保存后如何獲得回應？
下一篇：在模式后洗掉部分字串