test/test_ggplotMDS_contColor.R
In jrthompson54/DGE.Tools2: A function library to facilitate Differential Gene Expression Analysis
# test ggplotMDS with continuous color scale
library(magrittr)
library(tidyverse)
library(DGEobj)
library(DGE.Tools2)
library(JRTutil)
dgeObj <- getRDSobjFromStash("BDL_Rat_LiverSlice_P-20170808-0001_03Dec2017.RDS")
dgeObj$design$number <- 1:ncol(dgeObj)
log2CPM <- convertCounts(dgeObj$counts, unit="cpm", log=TRUE, normalize = "tmm")
mdsresult <- ggplotMDS(log2CPM, colorBy = dgeObj$design$number, shapeBy=dgeObj$design$compound, labels=NULL)
mdsresult$plot
jrthompson54/DGE.Tools2 documentation built on May 12, 2021, 8:47 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
# test ggplotMDS with continuous color scale
library(magrittr)
library(tidyverse)
library(DGEobj)
library(DGE.Tools2)
library(JRTutil)
dgeObj <- getRDSobjFromStash("BDL_Rat_LiverSlice_P-20170808-0001_03Dec2017.RDS")
dgeObj$design$number <- 1:ncol(dgeObj)
log2CPM <- convertCounts(dgeObj$counts, unit="cpm", log=TRUE, normalize = "tmm")
mdsresult <- ggplotMDS(log2CPM, colorBy = dgeObj$design$number, shapeBy=dgeObj$design$compound, labels=NULL)
mdsresult$plot
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.