changeset 28:9b6252925ccf draft

Uploaded
author greg
date Mon, 26 Jun 2017 10:09:33 -0400
parents 23c0f5c519ac
children 96e1400d3125
files ks_distribution.R
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/ks_distribution.R	Mon Jun 26 10:05:56 2017 -0400
+++ b/ks_distribution.R	Mon Jun 26 10:09:33 2017 -0400
@@ -155,7 +155,7 @@
 
 # Handle colors for components.
 if (is.na(opt$colors))
- {
+{
     # Randomly specify colors for components.
     specified_colors <- c('red', 'yellow', 'green', 'black', 'blue', 'darkorange')
 }
@@ -166,8 +166,10 @@
     parser$addData(opt$colors)
     raw_colors <- parser$getObject()
     specified_colors <- c()
-    for (raw_color in raw_colors) {
+    for (raw_color in raw_colors)
+    {
         specified_colors <- c(specified_colors, raw_color)
+    }
 }
 
 # Read in the components data.