Calculates analytical mean squared error estimates of the spatial EBLUPs obtained from the fit of a spatial Fay-Herriot model, in which area effects follow a Simultaneously Autorregressive (SAR) process.
mseSFH(formula, vardir, proxmat, method = "REML", MAXITER = 100,
PRECISION = 0.0001, data)
an object of class formula
(or one that can be coerced to that class):
a symbolic description of the model to be fitted. The variables included in formula
must have a length equal to the number of domains D
. Details of model specification are given under Details.
vector containing the D
sampling variances of direct estimators for each domain.
The values must be sorted as the variables in formula
.
D*D
proximity matrix or data frame with values in the interval [0,1]
containing the proximities between the row and column domains. The rows add up to 1. The rows and columns of this matrix must be sorted as the variables in formula
.
type of fitting method, to be chosen between "REML"
or "ML"
. Default value is REML
.
maximum number of iterations allowed for the Fisher-scoring algorithm. Default value is 100
.
convergence tolerance limit for the Fisher-scoring algorithm. Default value is 0.0001
.
optional data frame containing the variables named in formula
and vardir
. By default the variables are taken from the environment from which mseSFH
is called.
The function returns a list with the following objects:
a list with the results of the estimation process: eblup
and fit
. For the description of these objects, see Value of eblupSFH
function.
a vector with the analytical mean squared error estimates of the spatial EBLUPs.
- Small Area Methods for Poverty and Living Conditions Estimates (SAMPLE), funded by European Commission, Collaborative Project 217565, Call identifier FP7-SSH-2007-1.
- Molina, I., Salvati, N. and Pratesi, M. (2009). Bootstrap for estimating the MSE of the Spatial EBLUP. Computational Statistics 24, 441-458.
- Singh, B., Shukla, G. and Kundu, D. (2005). Spatio-temporal models in small area estimation. Survey Methodology 31, 183-195.
# NOT RUN {
data(grapes) # Load data set
data(grapesprox) # Load proximity matrix
# Calculate analytical MSE estimates using REML method
result <- mseSFH(grapehect ~ area + workdays - 1, var, grapesprox, data=grapes)
result
# }
Run the code above in your browser using DataLab