bnp

commit dd80190895cd11da9b0a0d7ea4a836e7d4c89772
parent ca64fcd9ddb108ce2dc849d1d84a47bb30fb7921
Author: Jared Tobin <jared@jtobin.ca>
Date:   Thu, 17 Mar 2016 09:39:32 +1300

Use four clusters for 1d collapsed example.

Diffstat:
M
finite-gaussian-mixture/src/sim_fmm_1d_conditional_collapsed.r
 | 
3
++-

1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/finite-gaussian-mixture/src/sim_fmm_1d_conditional_collapsed.r b/finite-gaussian-mixture/src/sim_fmm_1d_conditional_collapsed.r
@@ -7,7 +7,7 @@ source('fmm_multivariate_conditional_collapsed.r')
 dimension = 1
 
 config = list(
-    k = 3
+    k = 4
   , m = dimension
   , a = 1
   , l = rep(0, dimension)
@@ -22,6 +22,7 @@ set.seed(222)
 d = list(
     as.matrix(replicate(100, rnorm(config$m, 5)))
   , as.matrix(replicate(100, rnorm(config$m, -5)))
+  , as.matrix(replicate(100, rnorm(config$m, 10)))
   , as.matrix(replicate(200, rnorm(config$m))))
 
 dn = lapply(d, function(j) { data.frame(x = j) })