reportMethods <- function(method) {
methods <- list(
Binalysis = binalysisMethods,
MetaboProfile = profileMethods,
Analysis = analysisMethods,
Workflow = workflowMethods,
Assignment = assignmentMethods
)
method <- methods[[method]]
return(method)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.