# HG changeset patch
# User greg
# Date 1498488519 14400
# Node ID 1800b6cdd672f4e8dab96d41d35d79c33ae313e7
# Parent  5652711d5ae43eb1702a5086051a2bffb5800724
Uploaded

diff -r 5652711d5ae4 -r 1800b6cdd672 ks_distribution.R
--- a/ks_distribution.R	Mon Jun 26 10:46:31 2017 -0400
+++ b/ks_distribution.R	Mon Jun 26 10:48:39 2017 -0400
@@ -167,7 +167,7 @@
 number_comp <- opt$number_comp
 
 # Set component colors.
-specified_colors = set_component_colors = function(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)