Mercurial > repos > greg > ks_distribution
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.