CreateNewPlantation: Create new plantation

In drGeorgeXenakis/fr3PGD: The Physiological Principles for Predicting Growth Model (3PG)

Usage

CreateNewPlantation(state, parms, fma)

Arguments

state
parms
fma

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (state, parms, fma) 
{
    Wl.s <- parms[["Wl.s"]]
    Wr.s <- parms[["Wr.s"]]
    Wsbr.s <- parms[["Wsbr.s"]]
    if (missing(fma)) {
        N <- state[["N"]]
    }
    else {
        N <- unique(fma$Npl)
    }
    state[["N"]] <- N
    state[["Wl"]] <- N * Wl.s/1000
    state[["Wr"]] <- N * Wr.s/1000
    state[["Wsbr"]] <- N * Wsbr.s/1000
    return(state)
  }

drGeorgeXenakis/fr3PGD documentation built on June 3, 2020, 6:10 a.m.