This function fits a Grubbs' model (using the parameterization of Theobald and Mallison, 1978) considering heavy-tailed distributions. This provides some degree of robustness to outliers.
heavyGrubbs(y, data, family = Student(df = 4), subset, na.action, control)
a formula or a numeric matrix or an object that can be coerced to a numeric matrix.
an optional data frame (or similar: see model.frame
), used only if
y
is a formula. By default the variables are taken from environment(formula)
.
a description of the error distribution to be used in the model. By default the Student-t distribution with 4 degrees of freedom is considered.
an optional expression indicating the subset of the rows of data that should be used in the fitting process.
a function that indicates what should happen when the data contain NAs.
a list of control values for the estimation algorithm to replace
the default values returned by the function heavy.control
.
A list with class "heavyGrubbs"
containing the following components:
a list containing an image of the heavyFit
call that produced the object.
the heavy.family
object used, with the estimated shape parameters (if requested).
final estimate of the center parameters (related with the additive biases).
final estimate of the dispersion parameters.
estimated latent variables.
the log-likelihood at convergence.
the number of iterations used in the iterative algorithm.
estimated weights corresponding to the assumed heavy-tailed distribution.
estimated squared Mahalanobis distances.
asymptotic covariance matrix of the center estimate.
Osorio, F., Paula, G.A., Galea, M. (2009). On estimation and influence diagnostics for the Grubbs' model under heavy-tailed distributions. Computational Statistics and Data Analysis 53, 1249-1263.
# NOT RUN {
data(thermocouples)
fit <- heavyGrubbs(100 * thermocouples, family = Student(df = 4))
fit
# }
Run the code above in your browser using DataLab