From 5b2daa43c608d648a077d37ed8ab0217f8ce8104 Mon Sep 17 00:00:00 2001
From: Chris Dyer <cdyer@cs.cmu.edu>
Date: Sun, 4 Mar 2012 21:35:50 -0500
Subject: move crp stuff around

---
 utils/Makefile.am |   5 ++-
 utils/crp_test.cc | 102 ++++++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 106 insertions(+), 1 deletion(-)
 create mode 100644 utils/crp_test.cc

(limited to 'utils')

diff --git a/utils/Makefile.am b/utils/Makefile.am
index bb067ed9..5153ae20 100644
--- a/utils/Makefile.am
+++ b/utils/Makefile.am
@@ -6,13 +6,14 @@ TESTS = ts phmt mfcr_test
 
 if HAVE_GTEST
 noinst_PROGRAMS += \
+  crp_test \
   dict_test \
   m_test \
   weights_test \
   logval_test \
   small_vector_test
 
-TESTS += small_vector_test logval_test weights_test dict_test m_test
+TESTS += crp_test small_vector_test logval_test weights_test dict_test m_test
 endif
 
 reconstruct_weights_SOURCES = reconstruct_weights.cc
@@ -50,6 +51,8 @@ mfcr_test_SOURCES = mfcr_test.cc
 mfcr_test_LDADD = $(GTEST_LDFLAGS) $(GTEST_LIBS)
 weights_test_SOURCES = weights_test.cc
 weights_test_LDADD = $(GTEST_LDFLAGS) $(GTEST_LIBS)
+crp_test_SOURCES = weights_test.cc
+crp_test_LDADD = $(GTEST_LDFLAGS) $(GTEST_LIBS)
 logval_test_SOURCES = logval_test.cc
 logval_test_LDADD = $(GTEST_LDFLAGS) $(GTEST_LIBS)
 small_vector_test_SOURCES = small_vector_test.cc
diff --git a/utils/crp_test.cc b/utils/crp_test.cc
new file mode 100644
index 00000000..561cd4dd
--- /dev/null
+++ b/utils/crp_test.cc
@@ -0,0 +1,102 @@
+#include <iostream>
+#include <vector>
+#include <string>
+
+#include <gtest/gtest.h>
+
+#include "ccrp.h"
+#include "sampler.h"
+
+const size_t MAX_DOC_LEN_CHARS = 10000000;
+
+using namespace std;
+
+class CRPTest : public testing::Test {
+ public:
+  CRPTest() {}
+ protected:
+  virtual void SetUp() { }
+  virtual void TearDown() { }
+  MT19937 rng;
+};
+
+TEST_F(CRPTest, Dist) {
+  CCRP<string> crp(0.1, 5);
+  double un = 0.25;
+  int tt = 0;
+  tt += crp.increment("hi", un, &rng);
+  tt += crp.increment("foo", un, &rng);
+  tt += crp.increment("bar", un, &rng);
+  tt += crp.increment("bar", un, &rng);
+  tt += crp.increment("bar", un, &rng);
+  tt += crp.increment("bar", un, &rng);
+  tt += crp.increment("bar", un, &rng);
+  tt += crp.increment("bar", un, &rng);
+  tt += crp.increment("bar", un, &rng);
+  cout << "tt=" << tt << endl;
+  cout << crp << endl;
+  cout << "  P(bar)=" << crp.prob("bar", un) << endl;
+  cout << "  P(hi)=" << crp.prob("hi", un) << endl;
+  cout << "  P(baz)=" << crp.prob("baz", un) << endl;
+  cout << "  P(foo)=" << crp.prob("foo", un) << endl;
+  double x = crp.prob("bar", un) + crp.prob("hi", un) + crp.prob("baz", un) + crp.prob("foo", un);
+  cout << "    tot=" << x << endl;
+  EXPECT_FLOAT_EQ(1.0, x);
+  tt += crp.decrement("hi", &rng);
+  tt += crp.decrement("bar", &rng);
+  cout << crp << endl;
+  tt += crp.decrement("bar", &rng);
+  cout << crp << endl;
+  cout << "tt=" << tt << endl;
+}
+
+TEST_F(CRPTest, Exchangability) {
+    double tot = 0;
+    double xt = 0;
+    CCRP<int> crp(0.5, 1.0);
+    int cust = 10;
+    vector<int> hist(cust + 1, 0);
+    for (int i = 0; i < cust; ++i) { crp.increment(1, 1.0, &rng); }
+    const int samples = 100000;
+    const bool simulate = true;
+    for (int k = 0; k < samples; ++k) {
+      if (!simulate) {
+        crp.clear();
+        for (int i = 0; i < cust; ++i) { crp.increment(1, 1.0, &rng); }
+      } else {
+        int da = rng.next() * cust;
+        bool a = rng.next() < 0.5;
+        if (a) {
+          for (int i = 0; i < da; ++i) { crp.increment(1, 1.0, &rng); }
+          for (int i = 0; i < da; ++i) { crp.decrement(1, &rng); }
+          xt += 1.0;
+        } else {
+          for (int i = 0; i < da; ++i) { crp.decrement(1, &rng); }
+          for (int i = 0; i < da; ++i) { crp.increment(1, 1.0, &rng); }
+        }
+      }
+      int c = crp.num_tables(1);
+      ++hist[c];
+      tot += c;
+    }
+    EXPECT_EQ(cust, crp.num_customers());
+    cerr << "P(a) = " << (xt / samples) << endl;
+    cerr << "E[num tables] = " << (tot / samples) << endl;
+    double error = fabs((tot / samples) - 5.4);
+    cerr << "  error = " << error << endl;
+    EXPECT_LT(error, 0.1);  // it's possible for this to fail, but
+                            // very, very unlikely
+    for (int i = 1; i <= cust; ++i)
+      cerr << i << ' ' << (hist[i]) << endl;
+}
+
+TEST_F(CRPTest, LP) {
+  CCRP<string> crp(1,1,1,1,0.1,50.0);
+  crp.increment("foo", 1.0, &rng);
+  cerr << crp.log_crp_prob() << endl;
+}
+
+int main(int argc, char** argv) {
+  testing::InitGoogleTest(&argc, argv);
+  return RUN_ALL_TESTS();
+}
-- 
cgit v1.2.3