cont with qc reporting

R/ggplot_commons.R

 require.auto(ggplot2)
 require.auto(scales)
-
+require(grid)
 
 
 
@@ -9,7 +9,6 @@ scale_fill_redgreed <- function() scale_fill_manual(values = c("red","darkgreen"
 rotXlab <- function() theme(axis.text.x = element_text(angle = 90, hjust = 1))
 
 
-  require(grid)
 
 
 # Multiple plot function

R/utils/spinr.R

 ## a thin wrapper around spin to make it more useful with more custom output
 
+require(plyr)
 require(knitr)
 require(stringr)
 

R/utils/spinr.sh

 
 
 spinr(){
-    if [ $# -ne 1 ]; then
-        echo -e "Usage: spinr <script.R>\nJust knit R documents as they are, no markdown is required (but supported to some extent)"
+    if [ $# -lt 1 ]; then
+        echo -e "Usage: spinr <script.R> [<other args>*]\nJust knit R documents as they are, no markdown is required (but supported to some extent)"
         return
     fi