MatlabInterface.h

Go to the documentation of this file.

// PLearn (A C++ Machine Learning Library)
// Copyright (C) 1998 Pascal Vincent
// Copyright (C) 1999-2002 Pascal Vincent, Yoshua Bengio and University of Montreal
//

// Redistribution and use in source and binary forms, with or without
// modification, are permitted provided that the following conditions are met:
// 
//  1. Redistributions of source code must retain the above copyright
//     notice, this list of conditions and the following disclaimer.
// 
//  2. Redistributions in binary form must reproduce the above copyright
//     notice, this list of conditions and the following disclaimer in the
//     documentation and/or other materials provided with the distribution.
// 
//  3. The name of the authors may not be used to endorse or promote
//     products derived from this software without specific prior written
//     permission.
// 
// THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
// IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
// OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN
// NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
// SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
// TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
// PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
// NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
// SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
// 
// This file is part of the PLearn library. For more information on the PLearn
// library, go to the PLearn Web site at www.plearn.org




/* *******************************************************
   * $Id: MatlabInterface.h,v 1.5 2004/07/21 16:30:51 chrish42 Exp $
   * AUTHORS: Christian Jauvin
   * This file is part of the PLearn library.
   ******************************************************* */


#ifndef MATLAB_INTERFACE_INC
#define MATLAB_INTERFACE_INC

//#include <stdlib.h>
//#include "stringutils.h"
#include <plearn/sys/Popen.h>
#include <plearn/math/RowMapSparseMatrix.h>

namespace PLearn {
using namespace std;

  class MatlabInterface
  {

    public:
    
    static string path() 
    {
      char* plearndir = getenv("PLEARNDIR");
      if(!plearndir)
        PLERROR("PLEARNDIR environment variable not defined");
      return string(plearndir)+"/Contrib/matlab/";
    }

      MatlabInterface(string matlab_file_header, string matlab_file = "", string id = "",
                      bool launch_in_background = false, bool erase_tmp_files = true);

      MatlabInterface(vector<string> matlab_file_header, string
                      matlab_file = "", string id = "",
                      bool launch_in_background = false, bool erase_tmp_files = true);

      Popen* launch();
  
      bool launchAndWaitFor(string matlab_end_answer);

      Popen* matlab;

      string matlab_file;

      string matlab_file_header;

//eigs_r11 routine (see below).
      static void eigs_r11(RowMapSparseMatrix<real>& A, 
                           Mat& evectors, 
                           int d, 
                           string which_eigenvalues, 
                           bool erase_tmp_files = true);

      static void eigs_r11(RowMapSparseMatrix<real>& A, 
                           Vec& evalues, 
                           int d, 
                           string which_eigenvalues, 
                           bool erase_tmp_files = true);

      static void eigs_r11(RowMapSparseMatrix<real>& A, 
                           Mat& evectors, 
                           Vec& evalues, 
                           int d, 
                           string which_eigenvalues, 
                           bool erase_tmp_files = true);

  protected:

      string id;

      bool launch_in_background;

      bool erase_tmp_files;

  };

  void matlabR11eigs(RowMapSparseMatrix<double>& A, Mat eigen_vectors, 
                     Vec eigen_values, string which_eigenvalues="LM");


} // end of namespace PLearn

#endif

---