使用 ... 傳遞引數
與其明確傳入 calc_harmonic_mean() 和 na.rm 引數,你可以使用 ... 來簡單地「將其他引數」轉給 mean()。
已載入 dplyr 套件。
本練習屬於課程
R 函式撰寫入門
動手互動練習
試著完成這個範例程式碼,體驗一下這個練習。
# Swap na.rm arg for ... in signature and body
calc_harmonic_mean <- function(x, na.rm = FALSE) {
x %>%
get_reciprocal() %>%
mean(na.rm = na.rm) %>%
get_reciprocal()
}