update DIA tutorial

docs/index.md

@@ -22,4 +22,5 @@ renv::install("nicolerg/ssGSEA2")
 ## Tutorial
 
 - [LFQ AP-MS](global_LFQ_prot_tutorial.html)
+- [DIA ccRCC](global_DIA_prot_tutorial.html)
 

vignettes/global_DIA_prot_tutorial.Rmd

@@ -1,5 +1,5 @@
 ---
-title: "FragPipeAnalystR DIA Global Proteome"
+title: "FragPipeAnalystR DIA Global Proteome Tutorial"
 output:
   html_document:
     keep_md: yes
@@ -39,12 +39,30 @@ plot_feature_numbers(ccrcc)
 plot_feature(ccrcc, c("CA9", "AHNAK2", "NDUFV2", "PIGR"))
 ```
 
+## Imputation
+
+``` {r include=T, warning=F}
+imputed <- manual_impute(ccrcc)
+```
+
+``` {r include=T, warning=F}
+plot_pca(imputed)
+```
+
+## DE result without imputation
 ```{r include=T, warning=F}
 de_result <- test_limma(ccrcc, type = "all")
 de_result_updated <- add_rejections(de_result)
 plot_volcano(de_result_updated, "Tumor_vs_NAT")
 ```
 
+## DE result with imputation
+```{r include=T, warning=F}
+de_result <- test_limma(imputed, type = "all")
+de_result_updated <- add_rejections(de_result)
+plot_volcano(de_result_updated, "Tumor_vs_NAT")
+```
+
 ``` {r include=T, warning=F}
 sessionInfo()
 ```

vignettes/global_DIA_prot_tutorial.md

@@ -1,5 +1,5 @@
 ---
-title: "FragPipeAnalystR DIA Global Proteome"
+title: "FragPipeAnalystR DIA Global Proteome Tutorial"
 output:
   html_document:
     keep_md: yes
@@ -11,7 +11,7 @@ FragPipeAnalystR is a R package intended for FragPipe downstream analysis. We al
 
 ## CCRCC DIA data
 
-As described in the manuscript, DIA ccRCC data were fetched from [Clark et al. (2019)](https://doi.org/10.1016/j.cell.2019.10.007) and processed via FragPipe. As you will see in the following sections. The result is quite similar to corresponding TMT data.
+As described in the manuscript, DIA ccRCC data were fetched from [Clark et al. (2019)](https://doi.org/10.1016/j.cell.2019.10.007) and processed via [FragPipe](https://fragpipe.nesvilab.org/). As you will see in the following sections. The result is quite similar to corresponding TMT data.
 
 ```r
 library(FragPipeAnalystR)
@@ -69,6 +69,21 @@ plot_feature(ccrcc, c("CA9", "AHNAK2", "NDUFV2", "PIGR"))
 
 ![](global_DIA_prot_tutorial_files/figure-html/unnamed-chunk-6-1.png)<!-- -->
 
+## Imputation
+
+
+```r
+imputed <- manual_impute(ccrcc)
+```
+
+
+```r
+plot_pca(imputed)
+```
+
+![](global_DIA_prot_tutorial_files/figure-html/unnamed-chunk-8-1.png)<!-- -->
+
+## DE result without imputation
 
 ```r
 de_result <- test_limma(ccrcc, type = "all")
@@ -83,7 +98,24 @@ de_result_updated <- add_rejections(de_result)
 plot_volcano(de_result_updated, "Tumor_vs_NAT")
 ```
 
-![](global_DIA_prot_tutorial_files/figure-html/unnamed-chunk-7-1.png)<!-- -->
+![](global_DIA_prot_tutorial_files/figure-html/unnamed-chunk-9-1.png)<!-- -->
+
+## DE result with imputation
+
+```r
+de_result <- test_limma(imputed, type = "all")
+```
+
+```
+## Tested contrasts: Tumor_vs_NAT
+```
+
+```r
+de_result_updated <- add_rejections(de_result)
+plot_volcano(de_result_updated, "Tumor_vs_NAT")
+```
+
+![](global_DIA_prot_tutorial_files/figure-html/unnamed-chunk-10-1.png)<!-- -->
 
 
 ```r
@@ -109,7 +141,7 @@ sessionInfo()
 ## [1] stats     graphics  grDevices datasets  utils     methods   base     
 ## 
 ## other attached packages:
-## [1] FragPipeAnalystR_0.1.4
+## [1] FragPipeAnalystR_0.1.5
 ## 
 ## loaded via a namespace (and not attached):
 ##   [1] bitops_1.0-7                fdrtool_1.2.17