example_logisticregression_paris.cpp

Programa para el testeo de las funciones.Para compilar o código example_logisticregression_paris.cpp:

g++ -static -o example_logisticregression_paris example_logisticregression_paris.cpp -lpdsmlmm -lpdsramm -lpdsspmm

Para executar o programa:

./example_logisticregression_paris

Retornando por consola:

Classification - original

Classification - paralelo

Classification - evaluado

Código example_logisticregression_paris.cpp:

 
#include <iostream>
#include <Pds/Ra>
#include <Pds/Ml>
        
int main(void)
{
    Pds::Ra::Randomize();
    Pds::Octave::XLabel="x_1";
    Pds::Octave::YLabel="x_2";
    Pds::Octave::XLimits=true;
    Pds::Octave::YLimits=true;
    Pds::Vector W;
    Pds::Vector Yp;
    
    // Generating data
    unsigned int L=1000;
    Pds::Matrix X;
    Pds::Vector Y;
    Pds::DataSet::Classification::LoadDataBand(L,X,Y);
        
    // Método ortogonal
    W=Pds::LogisticModel::GetW0MeanMethod(X);
    W.T().Print("W:\n");
    
    Pds::Octave::Plot::PointsX2DYW(X,Y,W,"testando.m","example_logisticregression_paris_orig.png");
    
    W=Pds::LogisticModel::FittingParrallelPlaneIS(X,Y,W);
    W.T().Print("W:\n");
    
    Pds::Octave::Plot::PointsX2DYW(X,Y,W,"testando.m","example_logisticregression_paris_par.png");
    
    Yp=Pds::LogisticModel::Classify(W,X);
    Pds::Octave::Plot::PointsX2DYW(X,Yp,W,"testando.m","example_logisticregression_paris_eval.png");
    
    std::cout<<"Accuracy: "<<Pds::Accuracy(Y,Yp)<<"\n";
    
    return 0;
}