changeset 49:3a30d1b983b3 draft

Uploaded
author greg
date Mon, 26 Jun 2017 14:22:08 -0400
parents 5c48e4c497f4
children 0b3d12ecce28
files ks_distribution.R
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/ks_distribution.R	Mon Jun 26 14:20:47 2017 -0400
+++ b/ks_distribution.R	Mon Jun 26 14:22:08 2017 -0400
@@ -33,7 +33,7 @@
             for (i in num_colors_specified:number_comp) {
                 if (!('red' %in% names(specified_colors))) {
                     specified_colors <- c(specified_colors, 'red')
-                } else if ((!('yellow' %in% names(specified_colors))) {
+                } else if (!('yellow' %in% names(specified_colors))) {
                     specified_colors <- c(specified_colors, 'yellow')
                 } else if (!('green' %in% names(specified_colors))) {
                     specified_colors <- c(specified_colors, 'green')