6 lines
265 B
R
6 lines
265 B
R
|
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.
|