| 
									
										
										
										
											2010-10-14 12:54:38 +08:00
										 |  |  | /* ----------------------------------------------------------------------------
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  |  * GTSAM Copyright 2010, Georgia Tech Research Corporation,  | 
					
						
							|  |  |  |  * Atlanta, Georgia 30332-0415 | 
					
						
							|  |  |  |  * All Rights Reserved | 
					
						
							|  |  |  |  * Authors: Frank Dellaert, et al. (see THANKS for the full author list) | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  |  * See LICENSE for the license information | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  |  * -------------------------------------------------------------------------- */ | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-10-28 04:44:40 +08:00
										 |  |  | /**
 | 
					
						
							|  |  |  |  * @file    testBinaryBayesNet.cpp | 
					
						
							| 
									
										
										
										
											2009-12-07 05:46:46 +08:00
										 |  |  |  * @brief   Unit tests for BinaryBayesNet | 
					
						
							|  |  |  |  * @author  Manohar Paluri | 
					
						
							| 
									
										
										
										
											2009-10-28 04:44:40 +08:00
										 |  |  |  */ | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-12-07 05:46:46 +08:00
										 |  |  | // STL/C++
 | 
					
						
							|  |  |  | #include <iostream>
 | 
					
						
							|  |  |  | #include <sstream>
 | 
					
						
							| 
									
										
										
										
											2009-12-07 08:49:13 +08:00
										 |  |  | #include <map>
 | 
					
						
							| 
									
										
										
										
											2010-08-20 01:23:19 +08:00
										 |  |  | #include <gtsam/CppUnitLite/TestHarness.h>
 | 
					
						
							| 
									
										
										
										
											2009-12-07 05:46:46 +08:00
										 |  |  | #include <boost/tuple/tuple.hpp>
 | 
					
						
							|  |  |  | #include <boost/foreach.hpp>
 | 
					
						
							| 
									
										
										
										
											2009-10-28 04:44:40 +08:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-12-07 05:46:46 +08:00
										 |  |  | #include <boost/assign/std/vector.hpp> // for operator +=
 | 
					
						
							|  |  |  | using namespace boost::assign; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | #ifdef HAVE_BOOST_SERIALIZATION
 | 
					
						
							|  |  |  | #include <boost/archive/text_oarchive.hpp>
 | 
					
						
							|  |  |  | #include <boost/archive/text_iarchive.hpp>
 | 
					
						
							|  |  |  | #endif //HAVE_BOOST_SERIALIZATION
 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2010-01-18 03:34:57 +08:00
										 |  |  | #define GTSAM_MAGIC_KEY
 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2010-08-20 01:23:19 +08:00
										 |  |  | #include <gtsam/inference/BinaryConditional.h>
 | 
					
						
							|  |  |  | #include <gtsam/inference/BayesNet-inl.h>
 | 
					
						
							|  |  |  | #include <gtsam/inference/Ordering.h>
 | 
					
						
							|  |  |  | #include <gtsam/inference/SymbolMap.h>
 | 
					
						
							| 
									
										
										
										
											2009-12-07 05:46:46 +08:00
										 |  |  | 
 | 
					
						
							|  |  |  | using namespace std; | 
					
						
							| 
									
										
										
										
											2009-10-28 04:44:40 +08:00
										 |  |  | using namespace gtsam; | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-12-07 05:46:46 +08:00
										 |  |  | /** A Bayes net made from binary conditional probability tables */ | 
					
						
							|  |  |  | typedef BayesNet<BinaryConditional> BinaryBayesNet; | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-12-07 15:12:01 +08:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2010-01-22 12:41:40 +08:00
										 |  |  | double probability( BinaryBayesNet & bbn, SymbolMap<bool> & config) | 
					
						
							| 
									
										
										
										
											2009-12-07 15:12:01 +08:00
										 |  |  | { | 
					
						
							|  |  |  | 	double result = 1.0; | 
					
						
							|  |  |  | 	BinaryBayesNet::const_iterator it = bbn.begin(); | 
					
						
							|  |  |  | 	while( it != bbn.end() ){ | 
					
						
							|  |  |  | 		result *= (*it)->probability(config); | 
					
						
							|  |  |  | 		it++; | 
					
						
							|  |  |  | 	} | 
					
						
							|  |  |  | 	return result; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-12-07 11:25:25 +08:00
										 |  |  | /************************************************************************** */ | 
					
						
							| 
									
										
										
										
											2009-10-28 04:44:40 +08:00
										 |  |  | TEST( BinaryBayesNet, constructor ) | 
					
						
							|  |  |  | { | 
					
						
							| 
									
										
										
										
											2009-12-07 08:49:13 +08:00
										 |  |  | 	// small Bayes Net x <- y
 | 
					
						
							|  |  |  | 	// p(y) = 0.2
 | 
					
						
							|  |  |  | 	// p(x|y=0) = 0.3
 | 
					
						
							|  |  |  | 	// p(x|y=1) = 0.6
 | 
					
						
							| 
									
										
										
										
											2009-12-07 05:46:46 +08:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2010-01-22 12:41:40 +08:00
										 |  |  | 	SymbolMap<bool> config; | 
					
						
							| 
									
										
										
										
											2009-12-07 15:12:01 +08:00
										 |  |  | 	config["y"] = false; | 
					
						
							|  |  |  | 	config["x"] = false; | 
					
						
							| 
									
										
										
										
											2009-12-07 08:49:13 +08:00
										 |  |  | 	// unary conditional for y
 | 
					
						
							|  |  |  | 	boost::shared_ptr<BinaryConditional> py(new BinaryConditional("y",0.2)); | 
					
						
							| 
									
										
										
										
											2009-12-07 15:12:01 +08:00
										 |  |  | 	DOUBLES_EQUAL(0.8,py->probability(config),0.01); | 
					
						
							| 
									
										
										
										
											2009-12-07 05:46:46 +08:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-12-07 08:49:13 +08:00
										 |  |  | 	// single parent conditional for x
 | 
					
						
							|  |  |  | 	vector<double> cpt; | 
					
						
							| 
									
										
										
										
											2010-10-09 11:09:58 +08:00
										 |  |  | 	cpt += 0.3, 0.6 ; // array index corresponds to binary parent values structure
 | 
					
						
							| 
									
										
										
										
											2009-12-07 08:49:13 +08:00
										 |  |  | 	boost::shared_ptr<BinaryConditional> px_y(new BinaryConditional("x","y",cpt)); | 
					
						
							| 
									
										
										
										
											2009-12-07 15:12:01 +08:00
										 |  |  | 	DOUBLES_EQUAL(0.7,px_y->probability(config),0.01); | 
					
						
							| 
									
										
										
										
											2009-12-07 05:46:46 +08:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-12-07 08:49:13 +08:00
										 |  |  | 	// push back conditionals in topological sort order (parents last)
 | 
					
						
							|  |  |  | 	BinaryBayesNet bbn; | 
					
						
							|  |  |  | 	bbn.push_back(py); | 
					
						
							|  |  |  | 	bbn.push_back(px_y); | 
					
						
							| 
									
										
										
										
											2009-12-07 05:46:46 +08:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-12-07 08:49:13 +08:00
										 |  |  | 	// Test probability of 00,01,10,11
 | 
					
						
							| 
									
										
										
										
											2009-12-07 15:12:01 +08:00
										 |  |  | 	DOUBLES_EQUAL(0.56,probability(bbn,config),0.01); // P(y=0)P(x=0|y=0) = 0.8 * 0.7 = 0.56;
 | 
					
						
							| 
									
										
										
										
											2009-10-28 04:44:40 +08:00
										 |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | /* ************************************************************************* */ | 
					
						
							| 
									
										
										
										
											2009-12-07 05:46:46 +08:00
										 |  |  | int main() { TestResult tr; return TestRegistry::runAllTests(tr);} | 
					
						
							| 
									
										
										
										
											2009-10-28 04:44:40 +08:00
										 |  |  | /* ************************************************************************* */ |