From 14a358e5e86ede20bef667e105254ffcd8392715 Mon Sep 17 00:00:00 2001
From: depristo <depristo@348d0f76-0448-11de-a6fe-93d51630548a>
Date: Mon, 13 Jun 2011 17:12:42 +0000
Subject: [PATCH] Oops, forgot one tiny thing

git-svn-id: file:///humgen/gsa-scr1/gsa-engineering/svn_contents/trunk@5981 348d0f76-0448-11de-a6fe-93d51630548a
---
 R/exomePostQC.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/exomePostQC.R b/R/exomePostQC.R
index 5ee5287ee..d840adf9d 100644
--- a/R/exomePostQC.R
+++ b/R/exomePostQC.R
@@ -156,7 +156,7 @@ perSamplePlots <- function(metricsBySamples) {
   sampleTextLabel <- geom_text(aes(label=Sample, size=highlightTextSizes)) 
   sampleTextLabelScale <- scale_size("Highlighted samples", to=c(3,5), breaks=c(1,2), labels=c("regular", "highlighted"))
   xAxis <- scale_x_discrete("Sample (ordered by nSNPs)", formatter=function(x) "")
-  myRug <- geom_rug(position=jitter)
+  myRug <- geom_rug(position="jitter")
   #myRug <- geom_rug(aes(x = NULL))
 
   measures = c("nSNPs", "tiTvRatio", "nSingletons", "nIndels", "nInsertions", "nDeletions", "deletionInsertionRatio")