# NOT RUN {
x <- c(rnorm(20, 100, 5), 10)
m <- maximum_normed_residual(x = x)
glance(m)
## # A tibble: 1 x 4
## mnr alpha crit n_outliers
## <dbl> <dbl> <dbl> <dbl>
## 1 4.23 0.05 2.73 1
# }
Run the code above in your browser using DataLab