Рефакторинг: функции
Скопировать и вставить код один раз — допустимо, но если это повторяется трижды, что-то явно пошло не так.
Приведённый код вычисляет приблизительный 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 + ___)
}