gev.d2stdgumbel.Rd 1.28 KB
 Jana Ulrich committed May 20, 2019 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 % Generated by roxygen2: do not edit by hand % Please edit documentation in R/gevdfit.R \name{gev.d2stdgumbel} \alias{gev.d2stdgumbel} \title{Transform data to standart gumbel} \usage{ gev.d2stdgumbel(xdat, ds, params) } \arguments{ \item{xdat}{A vector containing maxima for different durations.} \item{ds}{A vector of aggregation levels corresponding to the maxima in xdat.} \item{params}{list of parameters mu_tilde, sigma0, xi, theta, eta as obtained from \code{\link{gev.d.params}}} } \value{ Vector containing transformed data. } \description{ Transform data to standart gumbel } \examples{ data('example',package = 'IDF') # fit subset ind <- sample(1:10, length(example$dat), replace=TRUE) fit.subs <- gev.d.fit(example$dat[ind!=1],example$d[ind!=1] ,ydat = as.matrix(example[ind!=1,c("cov1","cov2")]) ,mul = c(1,2),sigl = 1) # calculate parameters for unfitted values par <- gev.d.params(fit = fit.subs ,ydat = as.matrix(example[ind==1,c("cov1","cov2")])) # transform unfitted values to standart gumbel sg.data <- gev.d2stdgumbel(xdat = example$dat[ind==1] ,ds = example$d[ind==1],params = par) # check unfitted values agains standart gumbel gev.d.diag(data.frame(data=sg.data,ds=example$d[ind==1]),pch=20) }