R/plot.modelFrame.R

In BIOdry: Multilevel Modeling of Dendroclimatical Fluctuations

plot.modelFrame <- structure(function #Plot modelFrame objects
### Diagnostic Trellis plot for fluctuations in
### \code{\link{modelFrame}} objects are obtained.
(
    x, ##<< An object inheriting from class \code{\link{modelFrame}}.
    
    ... ##<< further arguments passed to the Trellis plot function.
) {
        plot(x$'fluc',  
             type = 'l',
             ## grid = FALSE,
             abline = list(h = 0,
                           lty = 2,
                           lwd = 0.5,
                           col = 'gray30'),
             ...)
        ## A diagnostic Trellis plot.
} , ex=function() {
    ##TRW chronology (mm) and inside-bark radii
    data(Pchron,envir = environment())
    
    ## Parameters of allometric model to compute Diameter at Breast
    ## Height over bark (DBH, cm) from diameter inside bark (dib, cm)
    ## and Total Tree Biomass (TTB, kg tree -1 ) from DBH (Lara
    ## et. al. 2013):
    biom_param <- c(2.87, 0.85, 0.05, 2.5)

    ## Modeling tree-biomass fluctuations while accounting for
    ## within-plot source variability (see defaults in "modelFrame"
    ## function)
    ## /donttest{
    ##     trwf <- modelFrame(Pchron,
    ##                        to = 'cm',
    ##                        MoreArgs = list(mp = c(2,1, biom_param)),
    ##                        log.t = FALSE,
    ##                        on.time = FALSE)
    ##     plot(trwf, grid = FALSE)
    ## }
})