powered by
Data for Exercise 1.119
Append
A data frame/tibble with 20 observations on one variable
fees for an appendectomy for a random sample of 20 hospitals in North Carolina
Kitchens, L. J. (2003) Basic Statistics and Data Analysis. Pacific Grove, CA: Brooks/Cole, a division of Thomson Learning.
# NOT RUN { fee <- Append$fee ll <- mean(fee) - 2*sd(fee) ul <- mean(fee) + 2*sd(fee) limits <-c(ll, ul) limits fee[fee < ll | fee > ul] # }
Run the code above in your browser using DataLab