setConstructorS3("FastqQualityReport", function(dataSet=NULL, ...) {
# Validate arguments
if (!is.null(dataSet)) {
# Argument 'dataSet':
dataSet <- Arguments$getInstanceOf(dataSet, "FastqDataSet")
} # if (!is.null(dataSet))
# Arguments '...':
args <- list(...)
extend(Object(), c("FastqQualityReport"),
.ds = dataSet
)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.