#' PathwayObject
#'
#' @slot Data list.
#' @slot PData data.frame.
#' @slot metadata data.frame.
#' @slot plot list.
#' @slot Data.RR data.frame.
#'
#' @return a PathwayObject
#' @export
#'
#'
#'
PathwayObject <- setClass(
Class="PathwayObject",
slots=list(
Data="list",
PData="data.frame",
metadata="data.frame",
plot="list",
Data.RR="data.frame"),
prototype=list(
Data=NULL,
PData=NULL,
metadata = NULL,
plot=NULL,
Data.RR=NULL)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.