Displaying 1 result from an estimated 1 matches for "accinfolist".
2008 Aug 27
1
conversion of data structure between R and Perl
...defined($filename=glob("*.log"))){
open(WORDLIST , $filename)||die("can't open the file!");
while($line=<WORDLIST>){
if ($line=~m/accuracy/){
$line=~s/-----accuracy://;
@temp=split(" ",$line);
$temp[0]=~s/\%//;
$temp[2]=~s/\%//;
@accInfoList=($temp[0],$temp[2],$filename);
}
}
}
return(@accInfoList)
}
findAccuracy();
----------------------------------------------------------------------------------------
The R code
> class(system("perl presentPerformance.pl"))
[1] "integer"
regard,...