fix typos

xinhe-lab · Jul 26, 2024 · 7ae250e · 7ae250e
1 parent 761ab2f
commit 7ae250e
Show file tree

Hide file tree

Showing 3 changed files with 9 additions and 9 deletions.
diff --git a/R/ctwas_plots.R b/R/ctwas_plots.R
@@ -202,7 +202,6 @@ make_locusplot <- function(finemap_res,
   loginfo("QTL positions: %s", finemap_qtl_res$pos)
 
   # p-value panel
-  # browser()
   p_pvalue <- ggplot(loc$data, aes(x=.data$pos/1e6, y=.data$p, shape=.data$group,
                                    size=.data$group, alpha=.data$group)) +
     geom_point(aes(color=.data$r2_levels)) +

diff --git a/docs/articles/running_ctwas_analysis.html b/docs/articles/running_ctwas_analysis.html
diff --git a/vignettes/running_ctwas_analysis.Rmd b/vignettes/running_ctwas_analysis.Rmd
@@ -252,7 +252,7 @@ Here we show an example for fine mapping a single region "16_71020125_72901251".
 We first expand the region of interest with the full set of SNPs using the assembled `region_data`. We also need the number of causal signals (`L`) for this region. This is obtained from the output of the earlier `screen_regions()` function.
 
 ```{r example_region, eval=FALSE}
-region_id <-16_71020125_72901251"
+region_id <- "16_71020125_72901251"
 selected_region_data <- expand_region_data(region_data[region_id],
                                            snp_map,
                                            z_snp,