findSamtools <- function(...) {
# Aroma-specific variable
path <- getExternalHome("SAMTOOLS_HOME")
versionPattern <- c(".*Version:[ ]*([0-9.-]+).*")
findExternal(command="samtools", path=path, versionPattern=versionPattern, ...)
} # findSamtools()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.