Nothing
### R code from vignette source 'multiOmicsViz.Rnw'
###################################################
### code chunk number 1: Example
###################################################
library("multiOmicsViz")
sourceOmics <- system.file("extdata","sourceOmics.txt",package="multiOmicsViz")
sourceOmics <- read.table(sourceOmics,header=TRUE,sep="\t",stringsAsFactors=FALSE,check.names=FALSE)
targetOmics1 <- system.file("extdata","targetOmics.txt",package="multiOmicsViz")
targetOmics1 <- read.table(targetOmics1,header=TRUE,sep="\t",stringsAsFactors=FALSE,check.names=FALSE)
targetOmicsList <- list()
targetOmicsList[[1]] <- targetOmics1
outputfile <- paste(tempdir(),"/heatmap",sep="")
multiOmicsViz(sourceOmics,"CNA","20",targetOmicsList,"mRNA","All",0.001,outputfile)
###################################################
### code chunk number 2: Example
###################################################
library("multiOmicsViz")
matrix1 <- system.file("extdata","sourceOmics.txt",package="multiOmicsViz")
matrix1 <- read.table(matrix1,header=TRUE,sep="\t",stringsAsFactors=FALSE,check.names=FALSE)
matrix2 <- system.file("extdata","targetOmics.txt",package="multiOmicsViz")
matrix2 <- read.table(matrix2,header=TRUE,sep="\t",stringsAsFactors=FALSE,check.names=FALSE)
sig <- calculateCorForTwoMatrices(matrix1=matrix1,matrix2=matrix2,fdr=0.01)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.