Suggested module: Algorithm::SVM::Simple

[jimicarlo]

Algorithm::SVM and Algorithm::SVM::DataSet currently provide an
interface to libSVM (http://www.csie.ntu.edu.tw/~cjlin/libsvm/).

The makers of libSVM have written a guide on how best to use libSVM if
you're not an expert on SVMs (Chih-Wei Hsu, Chih-Chung Chang, and Chih-
Jen Lin : http://www.csie.ntu.edu.tw/~cjlin/papers/guide/guide.pdf).

The aim of Algorithm::SVM::Simple is to automate the process suggested
in the guide, and thereby simplify the interface to the SVM a little.

How many people are interested in this module? Any name suggestions?

[Ben Bullock]

It sounds like a good idea to me, although I'm not qualified to speak
very much. I was a little interested in SVMs for a handwriting
recognition project I have, but it was a little hard to understand the
topic.

> Any name suggestions?

I'm not sure that support vector machines are a pure "algorithm" so
I'd suggest using an upper name which had more to do with pattern
recognition. But it seems that the modules are already there.

--
perl -e'@a=qw/Harder Better Faster Stronger/;use Time::HiRes"ualarm";@z=(0,2,4,
6);@v=("Work It","Make It","Do It","Makes Us");sub w{("")x$_[0]}$|=$t=432250;@f
=split"/","More Than/Ever/Hour/After/Our/Work Is/Never/Over";@e=((map{join(":",
@f[$_,$_+1])}@z),"");@w=map"$v[$_]:$a[$_]",0..3;@h=(@w,@e);@j=w(5);@t=(@v,@j,@a
,@j);@l=(@t,@f[@z],@j,(map{$f[$_+1]}@z),@j,@t,@w,@j,@e,w(4),(@h)x6,w(9),(@h)x7)
;ualarm$t,$t;$SIG{ALRM}=sub{print p()};a:goto a;sub p{if(($c++)%2){exit if!@l;
if($_=shift@l){if(/(.*):(.*)/){$s=$2;$1}else{"$_\n"}}}elsif($s){" $s\n",$s=""}}'