R/class.R

In martin-ueding/paramvalf: Parameter Value Analysis Framework

#' paramval constructor
#'
#' @param param data.frame with parameters
#' @param value list with named lists.
#'
#' @export
paramval <- function (param, value) {
    pv <- list(param = param)
    if (!missing(value)) {
        pv$value <- value
    }
    class(pv) <- append(class(pv), 'paramval')
    return (pv)
}