# HG changeset patch
# User greg
# Date 1498487707 14400
# Node ID 812f09b96a6213ee63b4cc0293af878929edb4b4
# Parent  62bb454ad4e99b379ef54f94f1e610090df5f2c4
Uploaded

diff -r 62bb454ad4e9 -r 812f09b96a62 ks_distribution.R
--- a/ks_distribution.R	Mon Jun 26 10:28:20 2017 -0400
+++ b/ks_distribution.R	Mon Jun 26 10:35:07 2017 -0400
@@ -83,7 +83,7 @@
     barplot(nc, space=0.25, offset=0, width=0.04, xlim=c(0, max_ks), ylim=c(0, ymax), col="lightpink1", border="lightpink3")
     # Add x-axis.
     axis(1)
-    if (length(colors) == 0)
+    if (length(colors) == 0))
     {
         color <- c('red', 'yellow', 'green', 'black', 'blue', 'darkorange')
     }