Extract the coefficients of the fitted APLMS model

Extract the coefficients of the fitted APLMS model.

Usage

# S3 method for class 'aplms'
coef(object, ...)

Arguments

object: APLMS object.
...: other arguments

Value

A list of vectors of the corresponding estimated parameters.

Examples

data(temperature)
temperature.df = data.frame(temperature,time=1:length(temperature))
model<-aplms::aplms(temperature ~ 1,
                   npc=c("time"), basis=c("cr"),Knot=c(60),
                   data=temperature.df,family=Powerexp(k=0.3),p=1,
                   control = list(tol = 0.001,
                                  algorithm1 = c("P-GAM"),
                                  algorithm2 = c("BFGS"),
                                  Maxiter1 = 20,
                                  Maxiter2 = 25),
                   lam=c(10))
coef(model)
#> $gamma
#>          phi         rho1 
#>  0.002299184 -0.257121520 
#> 
#> $phirho
#> [1] 7589.838
#>