comparison 04_pca_plot.Rmd @ 1:32210899a3dd draft

planemo upload commit 841d8b22bf9f1aaed6bfe8344b60617f45b275b2-dirty
author mingchen0919
date Sun, 30 Dec 2018 12:45:56 -0500
parents
children
comparison
equal deleted inserted replaced
0:6f94b4b9de44 1:32210899a3dd
1 ---
2 title: 'Principle component analysis plot'
3 output:
4 html_document:
5 highlight: pygments
6 ---
7
8 ```{r setup, include=FALSE, warning=FALSE, message=FALSE}
9 knitr::opts_chunk$set(error = TRUE, echo = FALSE)
10 ```
11
12
13 ```{r}
14 vsd <- vst(dds, blind=FALSE)
15 p = plotPCA(vsd, intgroup=c(opt$X_D)) +
16 scale_color_discrete(name = 'Group') +
17 theme_classic()
18 ggplotly(p)
19 ```
20