summary.SAEMSpatialCens {CensSpatial}

Summary of a SAEMSpatialCens object.

Description

summary method for class "SAEMSpatialCens".

Usage

## S3 method for class 'SAEMSpatialCens'
summary(object,...)

Arguments

object

object of the class "SAEMSpatialCens" (see SAEMSCL function).

...

Additional arguments.

Value

mean.str

Estimates for the mean structure parameters \mathbf{beta} for SAEMSCL method.

var.str

Estimates for the variance structure parameters \sigma^2, \phi for SAEMSCL method.

Author(s)

Alejandro Ordonez <<[e-mail]>>, Victor H. Lachos <<[e-mail]>> and Christian E. Galarza <<[e-mail]>>

Maintainer: Alejandro Ordonez <<[e-mail]>>

References

DELYON, B., LAVIELLE, M.,ANDMOULI NES, E. (1999). Convergence of a stochastic approximation version of the EM algorithm.Annals of Statistic-s27, 1, 94-128.

Diggle, P. & Ribeiro, P. (2007). Model-Based Geostatistics. Springer Series in Statistics.

See Also

SAEMSCL

Examples

n<-200 ### sample size for estimation.
n1=50 ### number of observation used in the prediction.

###simulated coordinates
r1=sample(seq(1,30,length=400),n+n1)
r2=sample(seq(1,30,length=400),n+n1)
coords=cbind(r1,r2)

coords1=coords[1:n,]

type="matern"
#xtot<-cbind(1,runif((n+n1)),runif((n+n1),2,3))
xtot=as.matrix(rep(1,(n+n1)))
xobs=xtot[1:n,]
beta=5
#beta=c(5,3,1)

###simulated data
obj=rspacens(cov.pars=c(3,.3,0),beta=beta,x=xtot,coords=coords,kappa=1.2,
cens=0.25,n=(n+n1),n1=n1,cov.model=type,cens.type="left")

data2=obj$datare
cc=obj$cc
y=obj$datare[,3]
coords=obj$datare[,1:2]

est=SAEMSCL(cc,y,cens.type="left",trend="cte",coords=coords,
kappa=1.2,M=15,perc=0.25,MaxIter=10,pc=0.2,cov.model=type,
fix.nugget=TRUE,nugget=0,inits.sigmae=cov.ini[1],
inits.phi=cov.ini[2],search=TRUE,lower=0.00001,upper=100)

summary(est)