R/pva-class.R

In psolymos/PVAClone: Population Viability Analysis with Data Cloning

## this declares S4 class pvamodel
setClass("pvamodel",
    representation(
        growth.model="character",
        obs.error="character",
        model="dcModel",
        genmodel="dcModel",
        p="integer",
        support="matrix",
        params="character",
        varnames="character",
        fixed="nClones",
        fancy="character",
        transf="function",      # original --> diagn
        backtransf="function",  # diagn --> original
        logdensity="function",
        neffective="function"))

## this declares inheritance and extension for 'pva' S4 class
setClass("pva",
    representation(
        observations="numeric",
        model="pvamodel",
        summary="matrix",
        dcdata="dcFit"),
    contains = c("dcmle"))