# NOT RUN {
x <- c(0:10, 50)
# trimmed_mean() rounds number of observations
# to be trimmed to the nearest integer
trimmed_mean(x, trim = 0.05)
# base R function mean() rounds down number of
# observations to be trimmed
mean(x, trim = 0.05)
mean(x)
# }
Run the code above in your browser using DataLab