Kod 3.12 - NMSwBE

# Kod 3.12 Przykład zastosowania metody jackknife BARDZO PROSTE

library(bootstrap)

x <- rnorm(20)               

theta <- function(x){mean(x)}

                            

results <- jackknife(x,theta)