gev.d.fit.Rd

% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/gevdfit.R
\name{gev.d.fit}
\alias{gev.d.fit}
\title{Maximum-likelihood Fitting of the duration dependent GEV Distribution}
\usage{
gev.d.fit(xdat, ds, ydat = NULL, mul = NULL, sigl = NULL,
  shl = NULL, thetal = NULL, etal = NULL,
  mulink = make.link("identity"), siglink = make.link("identity"),
  shlink = make.link("identity"), thetalink = make.link("identity"),
  etalink = make.link("identity"), muinit = NULL, siginit = NULL,
  shinit = NULL, thetainit = NULL, etainit = NULL, show = TRUE,
  method = "Nelder-Mead", maxit = 10000, init.vals = NULL, ...)
}
\arguments{
\item{xdat}{A vector containing maxima for different durations. 
This can be obtained from \code{\link{IDF.agg}}.}

\item{ds}{A vector of aggregation levels corresponding to the maxima in xdat.}

\item{ydat}{A matrix of covariates for generalized linear modelling of the parameters 
(or NULL (the default) for stationary fitting). The number of rows should be the same as the 
length of xdat.}

\item{mul, sigl, shl, thetal, etal}{Numeric vectors of integers, giving the columns of ydat that contain
covariates for generalized linear modelling of the parameters (or NULL (the default) 
if the corresponding parameter is stationary).
Parameters are: modified location, scale_0, shape, duration offset, duration exponent repectively.}

\item{mulink, siglink, shlink, thetalink, etalink}{Link functions for generalized linear 
modelling of the parameters, created with \code{\link{make.link}}.}

\item{muinit, siginit, shinit, thetainit, etainit}{Initial values as numeric of length 
equal to total number of parameters. Alternatively initial values for only the parameter intercepts 
can be passed to \code{init.vals}.}

\item{show}{Logical; if TRUE (the default), print details of the fit.}

\item{method}{The optimization method used in \code{\link{optim}}.}

\item{maxit}{The maximum number of iterations.}

\item{init.vals}{vector of length 5, giving initial values for parameter intercepts
used to model the parameters. If NULL (the default) is given, initial parameters are obtained 
internally by fitting the GEV seperately for each duration and applying a linear model to optain the 
duration dependency of the location and shape parameter.}

\item{...}{Other control parameters for the optimization.}
}
\value{
A list containing the following components. 
A subset of these components are printed after the fit. 
If show is TRUE, then assuming that successful convergence is indicated, 
the components nllh, mle and se are always printed. 
\item{nllh}{single numeric giving the negative log-likelihood value} 
\item{mle}{numeric vector giving the MLE's for the modified location, scale_0, shape, 
duration offset and duration exponent, resp.} 
\item{se}{numeric vector giving the standard errors for the MLE's (in the same order)}
\item{trans}{An logical indicator for a non-stationary fit.}
\item{model}{A list with components mul, sigl, shl, thetal and etal.}
\item{link}{A character vector giving inverse link functions.}
\item{conv}{The convergence code, taken from the list returned by \code{\link{optim}}. 
A zero indicates successful convergence.}
\item{data}{data is standardized to standart Gumbel.} 
\item{cov}{The covariance matrix.} 
\item{vals}{Parameter values for every data point.}
\item{init.vals}{Initial values that where used.}
\item{ds}{Durations for every data point.}
}
\description{
Modified \code{\link[ismev]{gev.fit}} function for Maximum-likelihood fitting 
for the duration dependent generalized extreme 
value distribution, following Koutsoyiannis et al. (1988), including generalized linear 
modelling of each parameter.
}
\examples{
# sampled random data from d-gev with covariates
# GEV parameters:
# mu = 4 + 0.2*cov1 +0.5*cov2
# sigma = 2+0.5*cov1
# xi = 0.5
# theta = 0
# eta = 0.5

data('example',package ='IDF')

gev.d.fit(xdat=example$dat,ds = example$d,ydat=as.matrix(example[,c('cov1','cov2')])
,mul=c(1,2),sigl=1)
}
\seealso{
\code{\link{dgev.d}}, \code{\link{IDF.agg}}, \code{\link{gev.fit}}, \code{\link{optim}}
}