重構：函式
複製貼上一次還可以，但做到第 3 次通常就表示哪裡不對勁了。
提供的程式碼會為變數 x 與 y 計算近似的 95% 信賴區間。
本練習屬於課程
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 + ___)
}