diff --git a/session_4/session_4.Rmd b/session_4/session_4.Rmd index 34f337be122055d09860a900b2fc331d05e41caf..46b7df47494c322b1dd67bb7db802e55b0c3af42 100644 --- a/session_4/session_4.Rmd +++ b/session_4/session_4.Rmd @@ -474,7 +474,7 @@ For the next part, we will use a real data set. Anterior tibial muscle tissue wa First, we will use the gene count table of these samples, formatted for use in ggplot2 ( `pivot_longer()` [function](https://tidyr.tidyverse.org/reference/pivot_longer.html) ). -Open the csv file using the `read_csv2()` function. The file is located at "XXX". +Open the csv file using the `read_csv2()` function. The file is located at "http://perso.ens-lyon.fr/laurent.modolo/R/session_4/Expression_matrice_pivot_longer_DEGs_GSE86356.csv". <details><summary>Solution</summary> <p> @@ -549,4 +549,18 @@ ggplot(expr_DM1, aes(samples, Genes, fill= log1p(counts))) + </p> </details> +## Volcano Plot +For this last exercise, we will use the results of the differential gene expression analysis between DM1 vs WT conditions. + +Open the csv file using the `read_csv2()` function. The file is located at "http://perso.ens-lyon.fr/laurent.modolo/R/session_4/EWang_Tibialis_DEGs_GRCH37-87_GSE86356.csv". + +<details><summary>Solution</summary> + <p> +```{r read_csv2} +tab <- read_csv2("http://perso.ens-lyon.fr/laurent.modolo/R/session_4/EWang_Tibialis_DEGs_GRCH37-87_GSE86356.csv") + +expr_DM1 +``` + </p> +</details>