setOldClass(c("gg", "ggplot"))
#' @export
#' @rdname ggcyto
setClass("ggcyto", contains = c("gg", "ggplot"))
#' @export
#' @rdname ggcyto
setClass("ggcyto_flowSet", contains = "ggcyto")
#' @export
#' @rdname ggcyto
setClass("ggcyto_GatingSet", contains = "ggcyto_flowSet")
#' @export
#' @rdname ggcyto
setClass("ggcyto_GatingLayout", contains = "list", slots = c(arrange.main = "character"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.