code-hex / algorithm-naivebayes-randomforest

RandomForest with Algorithm::NaiveBayes in perl

NAME

Algorithm::NaiveBayes::RandomForest - RandomForest using Algorithm::NaiveBayes

SYNOPSIS

use Algorithm::NaiveBayes::RandomForest;

# 'max_processes' assignment child processes.
# This number is used as the number of trees.
my $nb = Algorithm::NaiveBayes::RandomForest->new(purge => 0, max_processes => 4);

# If you have 'save_file', you can use this method
# my $nb = Algorithm::NaiveBayes::RandomForest->new->restore_state('save_file'); 

$nb->add_instance(
    attributes => {
        Like => 0.875,
        Nice => 0.322,
        Thanks   => 0.3234
    },
    label => 'positive',
);
$nb->add_instance(
    attributes => {
        Unlike => 0.583,
        Bad => 0.294
    },
    label => 'negative',
);

$nb->train;

use Data::Dumper;
say Dumper $nb->predict(
    attributes => {
        Unlike => 0.332,
        Like   => 0.553,
        Nice   => 0.872
    }
);

DESCRIPTION

Algorithm::NaiveBayes::RandomForest is inheritance by Algorithm::NaiveBayes.
So, you can use same method as Algorithm::NaiveBayes.

SEE ALSO

Algorithm::NaiveBayes

LICENSE

Copyright (C) Kei Kamikawa(Code-Hex).

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR

Kei Kamikawa [email protected]