R/ModelAnalyticBolusSteadyState.R

#' Class "ModelAnalyticBolusSteadyState"
#'
#' @description The class \code{Model} defines information concerning the construction of an analytical model in steady state.
#' The class \code{ModelAnalyticBolusSteadyState} inherits from the class \code{ModelAnalyticSteadyState}.
#'
#' @name ModelAnalyticBolusSteadyState-class
#' @aliases ModelAnalyticBolusSteadyState
#' @docType class
#' @include ModelAnalyticSteadyState.R
#' @export

ModelAnalyticBolusSteadyState = setClass( "ModelAnalyticBolusSteadyState",
                                          contains = "ModelAnalyticSteadyState",
                                          prototype = prototype(
                                            initialConditions = list(NULL),
                                            odeSolverParameters = list(NULL) ) )

setMethod( f="initialize",
           signature="ModelAnalyticBolusSteadyState",
           definition= function (.Object, name, description, equations, outcomes, parameters, modelError )
           {
             if(!missing(name))
             {
               .Object@name = name
             }
             if(!missing(description))
             {
               .Object@description = description
             }
             if(!missing(equations))
             {
               .Object@equations = equations
             }
             if(!missing(outcomes))
             {
               .Object@outcomes = outcomes
             }
             if(!missing(parameters))
             {
               .Object@parameters = parameters
             }
             if(!missing(modelError))
             {
               .Object@modelError = modelError
             }

             validObject(.Object)
             return (.Object )
           }
)

##########################################################################################################
# END Class "ModelAnalyticBolusSteadyState"
##########################################################################################################

Try the PFIM package in your browser

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

PFIM documentation built on Nov. 24, 2023, 5:09 p.m.