Mercurial > repos > greg > ks_distribution

changeset 27:23c0f5c519ac draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author greg
date Mon, 26 Jun 2017 10:05:56 -0400
parents da8615a486fe
children 9b6252925ccf
files ks_distribution.R
diffstat 1 files changed, 6 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/ks_distribution.R	Mon Jun 26 10:00:41 2017 -0400
+++ b/ks_distribution.R	Mon Jun 26 10:05:56 2017 -0400
@@ -97,27 +97,27 @@
             color <- c(color, item)
         }
         num_colors_specified = length(color)
-        if (num_colors_specified < number_comp):
+        if (num_colors_specified < number_comp)
         {
             for (i in num_colors_specified:number_comp)
             {
-                if !(any(color=='red'))
+                if (!any(color=='red'))
                 {
                     color <- c(color, 'red')
                 }
-                else if !(any(color=='yellow'))
+                else if (!any(color=='yellow'))
                 {
                     color <- c(color, 'yellow')
                 }
-                else if !(any(color=='green'))
+                else if (!any(color=='green'))
                 {
                     color <- c(color, 'green')
                 }
-                else if !(any(color=='black'))
+                else if (!any(color=='black'))
                 {
                     color <- c(color, 'black')
                 }
-                else if !(any(color=='blue'))
+                else if (!any(color=='blue'))
                 {
                     color <- c(color, 'blue')
                 }