Hantera saknade värden
I den förra övningen hade många sektorer ett NA-värde för det harmoniska medelvärdet. Det skulle vara praktiskt om din funktion kunde ta bort saknade värden innan beräkningen görs.
Istället för att skriva egen kod för det kan du låta mean() sköta det.
Paketet dplyr är inläst.
Den här övningen är en del av kursen
Introduktion till att skriva funktioner i R
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# Add an na.rm arg with a default, and pass it to mean()
calc_harmonic_mean <- function(x) {
x %>%
get_reciprocal() %>%
mean() %>%
get_reciprocal()
}