inst/seqplots/global.R

In Przemol/seqplots-release: An interactive tool for visualizing NGS signals and sequence motif densities along genomic features using average plots and heatmaps.

#if( !'seqplots' %in% .packages() ) {
  suppressPackageStartupMessages({
    require(parallel)
    require(shiny)
    require(RJSONIO)
    require(RSQLite)
    require(rtracklayer)
    require(BSgenome)
    require(kohonen)
    require(Cairo)
    require(plotrix)
    require(fields)
    library(seqplots)
  })
#}

GENOMES <- BSgenome:::installed.genomes(splitNameParts=TRUE)$provider_version
if( length(GENOMES) ) 
  names(GENOMES) <- gsub('^BSgenome.', '', BSgenome:::installed.genomes())

if(Sys.getenv('root') == '' ) {
  source('server_config.R')
}