Рефакторинг: функції
Скопіювати й вставити один раз — це нормально, але якщо тричі, зазвичай щось не так.
Наданий код обчислює наближений 95% довірчий інтервал для змінних x та y.
Ця вправа є частиною курсу
Оборонне програмування R
Інструкції до вправи
- Створіть функцію з назвою
ci(), яка приймає єдиний аргументvaluesбез значень за замовчуванням. - Нехай функція повертає 95% довірчий інтервал.
Інтерактивна практична вправа
Спробуйте виконати цю вправу, доповнивши цей зразок коду.
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 + ___)
}