Merge pull request #17 from master/fix_lda

fix sim-lda script Thanks --- that one was my fault. I keep forgetting to clear the environment before testing the scripts.
stan-dev · Jan 8, 2015 · a48bd9c · a48bd9c
2 parents 908c45f + cf36c6f
commit a48bd9c
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/misc/cluster/lda/sim-lda.R b/misc/cluster/lda/sim-lda.R
@@ -13,6 +13,9 @@ avg_doc_length <- 10;
 doc_length <- rpois(M,avg_doc_length);
 N <- sum(doc_length);
 
+alpha <- rep(1/K,K);
+beta <- rep(1/V,V);
+
 theta <- rdirichlet(M,alpha);
 
 w <- rep(NA,N);
@@ -27,7 +30,4 @@ for (m in 1:M) {
   }
 }
 
-alpha <- rep(1/K,K);
-beta <- rep(1/V,V);
-
 dump(c("K","V","M","N","z","w","doc","alpha","beta"),"lda.data.R");