better reporting of bulk sizes

bmansfeld · Jul 15, 2018 · fca192f · fca192f
1 parent 1e4cf74
commit fca192f
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 2 deletions.
diff --git a/R/takagi_sim.R b/R/takagi_sim.R
@@ -98,7 +98,7 @@ simulateConfInt <- function(popStruc = "F2",
     if (popStruc == "F2") {
         message(
             "Assuming bulks selected from F2 population, with ",
-            bulkSize,
+            paste(bulkSize, collapse = " and "),
             " individuals per bulk."
         )
     } else {

diff --git a/vignettes/QTLseqr.Rmd b/vignettes/QTLseqr.Rmd
@@ -371,7 +371,8 @@ df_filt <- runQTLseqAnalysis(df_filt,
     )
 ```
 ```{r atlseqanalysis-msg, message = TRUE, warning = FALSE, collapse = TRUE, echo = FALSE}
-df_filt <- runQTLseqAnalysis(df_filt,
+df_filt <- runQTLseqAnalysis(
+    df_filt,
     windowSize = 1e6,
     popStruc = "F2", 
     bulkSize = c(385, 430),

diff --git a/vignettes/QTLseqr.pdf b/vignettes/QTLseqr.pdf