Nothing
library(MASS)
x <- c(rep(1.407,3), rep(1.422,4), 1.597, 1.597, rep(1.64,19), 1.649,
1.664, 1.664, 1.67, 1.672, 1.672, 1.787, 4.42, 4.44, rep(6.55,3),
rep(6.79,14), rep(7.19,,73), 9.00, 9.38, rep(9.41,10))
hubers(x) # failed to converge in MASS 7.3-9.
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.