excess.l(data,ln=FALSE,...)
TRUE
log-density is computed.mubz.*
function
(where *
stands for the category
of the model). In particular, category
is a character string
indicating
the model to be used:
"normal
", "lnormal
" or "copula
", and
params
gives the values of the
parameters for which the likelihood is computed.mubz.normal
,mubz.lnormal
, mubz.copula
.raw.data<-rCMS(copulas=c(copClayton,copGumbel),
margins=c(marginLnorm,marginFrechet),
classes=c(rep(1,4),rep(2,4)),
params=c(0.5,1,1.5,1.7),n=50)
data<-excess.censor(raw.data)
d<-excess.l(data,params=c(0.5,1,1.5,1.7),
category="copula",
copulas=c(copClayton,copGumbel),
margins=c(marginLnorm,marginFrechet),
classes=c(rep(1,4),rep(2,4)))
Run the code above in your browser using DataLab