|
0
|
1 ---
|
|
|
2 output: html_document
|
|
|
3 ---
|
|
|
4
|
|
|
5 ```{r setup, include=FALSE, warning=FALSE, message=FALSE}
|
|
|
6 knitr::opts_chunk$set(
|
|
|
7 echo = as.logical(opt$X_e),
|
|
|
8 error = TRUE
|
|
|
9 )
|
|
|
10 ```
|
|
|
11
|
|
|
12
|
|
|
13 # Peek at data {.tabset}
|
|
|
14
|
|
|
15 ## Count Data
|
|
|
16
|
|
|
17 ```{r 'count data'}
|
|
|
18 datatable(head(counts(dds), 100), style="bootstrap",
|
|
|
19 class="table-condensed", options = list(dom = 'tp', scrollX = TRUE))
|
|
|
20 ```
|
|
|
21
|
|
|
22 ## Sample Table
|
|
|
23
|
|
|
24 ```{r 'sample table'}
|
|
|
25 datatable(sample_table, style="bootstrap",
|
|
|
26 class="table-condensed", options = list(dom = 'tp', scrollX = TRUE))
|
|
|
27 ```
|
