contrib/mul/clsfy/clsfy_null_builder.cxx
Go to the documentation of this file.
00001 // This is mul/clsfy/clsfy_null_builder.cxx
00002 #ifdef VCL_NEEDS_PRAGMA_INTERFACE
00003 #pragma implementation
00004 #endif
00005 //:
00006 // \file
00007 // \brief Implement a null classifier builder
00008 // \author Ian Scott
00009 // \date 2009-08-27
00010 
00011 #include "clsfy_null_builder.h"
00012 
00013 #include <vcl_iostream.h>
00014 #include <vcl_string.h>
00015 #include <vcl_algorithm.h>
00016 #include <vsl/vsl_binary_loader.h>
00017 #include <vul/vul_string.h>
00018 #include <mbl/mbl_parse_block.h>
00019 #include <mbl/mbl_read_props.h>
00020 #include <clsfy/clsfy_null_classifier.h>
00021 
00022 
00023 
00024 
00025 //=======================================================================
00026 
00027 vcl_string clsfy_null_builder::is_a() const
00028 {
00029   return vcl_string("clsfy_null_builder");
00030 }
00031 
00032 //=======================================================================
00033 
00034 bool clsfy_null_builder::is_class(vcl_string const& s) const
00035 {
00036   return s == clsfy_null_builder::is_a() || clsfy_builder_base::is_class(s);
00037 }
00038 
00039 //=======================================================================
00040 
00041 clsfy_builder_base* clsfy_null_builder::clone() const
00042 {
00043   return new clsfy_null_builder(*this);
00044 }
00045 
00046 //=======================================================================
00047 
00048 void clsfy_null_builder::print_summary(vcl_ostream& os) const
00049 {
00050   os << "default_class: " << default_class_;
00051 }
00052 
00053 //=======================================================================
00054 
00055 void clsfy_null_builder::b_write(vsl_b_ostream& bfs) const
00056 {
00057   const short version_no = 1;
00058   vsl_b_write(bfs, version_no);
00059   vsl_b_write(bfs, default_class_);
00060 }
00061 
00062 //=======================================================================
00063 
00064 void clsfy_null_builder::b_read(vsl_b_istream& bfs)
00065 {
00066   if (!bfs) return;
00067 
00068   short version;
00069   vsl_b_read(bfs,version);
00070   switch (version)
00071   {
00072   case 1:
00073     vsl_b_read(bfs, default_class_);
00074     break;
00075   default:
00076     vcl_cerr << "I/O ERROR: vsl_b_read(vsl_b_istream&, clsfy_null_builder&)\n"
00077              << "           Unknown version number "<< version << '\n';
00078     bfs.is().clear(vcl_ios::badbit); // Set an unrecoverable IO error on stream
00079   }
00080 }
00081 
00082 //=======================================================================
00083 
00084 //: Build model from data
00085 // return the mean error over the training set.
00086 // For many classifiers, you may use nClasses==1 to
00087 // indicate a binary classifier
00088 double clsfy_null_builder::build(clsfy_classifier_base& model,
00089                                 mbl_data_wrapper<vnl_vector<double> >& inputs,
00090                                 unsigned /* nClasses */,
00091                                 const vcl_vector<unsigned> &outputs) const
00092 {
00093   clsfy_null_classifier &classifier = dynamic_cast<clsfy_null_classifier&>(model);
00094 
00095   classifier.set_default_class(default_class_);
00096 
00097   return static_cast<double>(
00098     vcl_count(outputs.begin(), outputs.end(), default_class_) )
00099     / outputs.size();
00100 }
00101 
00102 //=======================================================================
00103 //: Create empty classifier
00104 // Caller is responsible for deletion
00105 clsfy_classifier_base* clsfy_null_builder::new_classifier() const
00106 {
00107   return new clsfy_null_classifier();
00108 }
00109 
00110 //=======================================================================
00111 //: Initialise the parameters from a text stream.
00112 // The next non-ws character in the stream should be a '{'
00113 // \verbatim
00114 // {
00115 //   default_class: 1  (default 0)
00116 // }
00117 // \endverbatim
00118 // \throw mbl_exception_parse_error if the parse fails.
00119 void clsfy_null_builder::config(vcl_istream &as)
00120 {
00121  vcl_string s = mbl_parse_block(as);
00122 
00123   vcl_istringstream ss(s);
00124   mbl_read_props_type props = mbl_read_props_ws(ss);
00125 
00126   {
00127     default_class_ = vul_string_atoi(
00128       props.get_optional_property("default_class", "0") );
00129   }
00130 
00131   // Check for unused props
00132   mbl_read_props_look_for_unused_props(
00133     "clsfy_null_builder::config", props, mbl_read_props_type());
00134 }