accaldwell

#
# mp035: modified version of the registry module from the Nim standard library
#

#
#
#            Nim's Runtime Library
#        (c) Copyright 2016 Andreas Rumpf
#
#    See the file "copying.txt", included in this

accaldwell

#!/usr/bin/env python
# quick script for demultiplexing reads from illumina fastq files
# Sean Davis <seandavi@gmail.com>
# 2012-06-29
#
import argparse
import Bio.SeqIO as SeqIO
from itertools import izip
import gzip
from string import maketrans

accaldwell

library(shiny)
library(data.table)

#uncomment for workaround
#assignInNamespace("cedta.override","shiny","data.table")

DT <- data.table(names=c("a","b","c","d","e"),value=c(1,3,5,7,10))

shinyServer(function(input, output) {

accaldwell

heatmapdata <- read.csv("~/Subsystem_by_Phylum-absolute.csv", sep="\t", check.names=FALSE)

row.names(heatmapdata) <- heatmapdata$Phylum

hmdata <- heatmapdata[,2:29]

myData <- data.matrix(hmdata)

# For melt() to work seamlessly, myData has to be a matrix.
longData <- melt(myData)