perlで軽く処理するためにStatistics::Rを使ってみたんだけどなんかいまいち
perlで処理している感がない
結局、Rはsourceで呼び出しているだけだから、配列とかそのまま扱えないの。だからこんな感じでコードを書かないといけない。
#!/usr/bin/perl
use Statistics::R ;
use strict;
use warnings;
my $R = Statistics::R->new() ;
$R->startR ;
$R->send(q`x <- c(5.05, 6.75, 3.21, 2.66)`) ;
$R->send(q`y <- c(1.65, 26.5, -5.93, 7.96)`) ;
$R->send(q`print(lsfit(x, y))`) ;
my $ret = $R->read ;
$R->stopR() ;
print $ret;
しかも結果はparseしてないヨ。
結局、Rでバッチ処理するのとなんら変わらないじゃないかと、、
$R->sendでjoin()使えば@xでもいけるじゃんとか言われそうだけど、それはちょっと違う。
$R->lsfit(@x,@y)みたいな感じでRのメソッド呼び出したいのよ。
Statistics::Rに比べるとrpyとかscipyのほうがずっと使いやすいかも。