method.priority.one <- function(Object.part, MethodVector)
{
#test if Method is availible
#WARNING if none of the methods are availible
}
method.priority.two <- function()
{
}
method.priority <- function()
{
#DESeq or DESeq2
#edgeR or limma
#samR or ...?
}
plot.priority <- function()
{
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.