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のほうがずっと使いやすいかも。