perl @array数据到R中

Question

一个非常简单的疑问，但我不知道如何管理这个。

我想为'datos.txt'中的所有数据绘制直方图。

a）使用R：

datos<-scan("datos.txt")
pdf("xh.pdf")
hist(datos)
dev.off()

b）如何在Perl中调用R来做同样的事情？

#!/usr/bin/perl
open(DAT,"datos.txt");
while (<DAT>) {
 chomp;
 push(@datos,$_);
}
#now I want a histogram of values in @datos

谢谢！！

Answer 1

Perl不是像R这样的以统计为中心的语言，因此在核心中不太可能找到图表功能。 但是Perl是一种通用语言，它可以做任何事情，你可以通过搜索CPAN找到你想要的东西。 快速浏览产生一些有希望的候选人：

• 统计::直方图
• PDL ::显卡::普瑞玛
• 数学:: GSL ::直方图

Answer 2

您也可以尝试使用perl模块

统计:: R.

这似乎支持Windows和Linux。 我还没有真正使用它。 因此，我不知道它是否易于安装（或者如果安装程序引入了大量依赖项，或者需要多少手动配置）。

它似乎是基于管道的，基于win32的系统的OS检查非常简单，所以我认为它在Linux上比在windows上更好。

但该模块似乎正在积极开发（截至2012年）。 对于你的用例，从perl向R发送一些简单的命令，值得一看。

Answer 3

有一次，我觉得我想要一个非常简单的命令行条形图（很容易适应直方图或散点图等）制作者，我可以坚持在管道的末端。 我不知道当时有很多的R，也没有我知道的利特勒 （它可能根本不会存在尚未），所以我想了做R的哈克嵌入在Perl。 但它确实有效。 我不会再这样写了，因为我现在知道更多的R，但它对我来说是有用的。 唯一的主要问题是，由于没有事件循环，程序必须人为地保持活动以防止窗口消失。 您将需要RSPerl包和脚本，如http://www.omegahat.org/RSPerl/所述。

#!/usr/bin/perl -w
use strict;
use R;
use RReferences;

&R::startR("--no-save", "--silent");

my $header = <>;
chomp $header;
my @header = split(/,/, $header);
my @x;
my @y;

while(<>){
    chomp;
    my @fields = split(/,/);
    push(@x, $fields[0]);
    push(@y, $fields[1]+0);
}

R::callWithNames("barplot", {"height",\@y, "data",\@x, "xlab",$header[0], "ylab",$header[1] });

print "Ctrl-C to exit\n";
while(sleep(60)){}