Hello,
how we can create a shiny app to run Deseq2 ?
suppose i have count table and meta table as below :
count_table
| GENE | sample1 | sample2 | sample3 | sample4 | sample5 |
|---|---|---|---|---|---|
| A1BG | 8 | 8 | 8 | 7 | 7 |
| A1BG-AS1 | 7 | 6 | 5 | 4 | 4 |
| A1CF | 6 | 6 | 6 | 7 | 6 |
| A2M | 6 | 6 | 2 | 7 | 6 |
meta_table
| sample | type | gender |
|---|---|---|
| sample1 | group1 | Male |
| sample2 | group1 | Female |
| sample3 | group1 | Male |
| sample4 | group2 | Female |
| sample5 | group2 | Female |
Deseq object created with following formula :
dds <- DESeqDataSetFromMatrix(countData = count_table,
colData = meta_table,
design= ~ type)
Question :
If User uploaded count_table and meta_table to create Deseq object . how we can create a shiny sidebar layout, where user will be able to select his choice ( either column "type" or column "gender" ) from meta_table to pass to above formula .