Refaktoring: funkce
Jednou zkopírovat a vložit kód je v pořádku, ale třikrát – to už obvykle signalizuje problém.
Níže uvedený kód vypočítává přibližný 95% interval spolehlivosti pro proměnné x a y.
Toto cvičení je součástí kurzu
Defenzivní programování v R
Pokyny k cvičení
- Vytvoř funkci s názvem
ci(), která přijímá jediný argumentvaluesbez výchozí hodnoty. - Nastav funkci tak, aby vracela 95% interval spolehlivosti.
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
n <- length(x); m <- mean(x); s <- sd(x)
c(m - 1.96 * s / sqrt(n), m + 1.96 * s / sqrt(n))
n <- length(y); m <- mean(y); s <- sd(y)
c(m - 1.96 * s/sqrt(n), m + 1.96 * s/sqrt(n))
# Define a function to prevent pasting the code above
ci <- function(values) {
n <- length(values)
m <- ___
s <- ___
c(m - ___, m + ___)
}