R/coefficients.gpd.R

Defines functions `coefficients.gpd` `coef.gpd`

`coefficients.gpd` <-
function( object, ... ) {
    res <- object$coefficients
    if ( length( res ) == 2 )
    names( res ) <- c( "phi", "xi" )
    res
}

`coef.gpd` <-
function( object, ... ) {
  coefficients.gpd(object)
}

Try the texmex package in your browser

Any scripts or data that you put into this service are public.

texmex documentation built on May 2, 2019, 4:56 p.m.