Mercurial > repos > greg > ks_distribution

changeset 39:686ea47c0ce3 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 11:58:46 -0400
parents 68447763ccc2
children 15478b43d94d
files ks_distribution.R
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/ks_distribution.R	Mon Jun 26 11:22:29 2017 -0400
+++ b/ks_distribution.R	Mon Jun 26 11:58:46 2017 -0400
@@ -32,7 +32,7 @@
         {
             specified_colors <- c(specified_colors, item)
         }
-        num_colors_specified = length(specified_colors)
+        num_colors_specified <- length(specified_colors)
         if (num_colors_specified < number_comp)
         {
             for (i in num_colors_specified:number_comp)
@@ -168,7 +168,7 @@
 number_comp <- opt$number_comp
 
 # Set component colors.
-specified_colors = set_component_colors(opt$colors, number_comp)
+specified_colors <- set_component_colors(opt$colors, number_comp)
 
 # Set pi, mu, var.
 items <- get_pi_mu_var(components_data, number_comp)