r - 将向量从 R 发送到 Perl

Question

我一直坚持将数据从 R 传递到 Perl。我正在使用Statistics::R CPAN 模块。

测试.R

a <- c(1:10)

测试.pl

my $R=Statistics::R->new();
$R->run_from_file(q'test.R');
my $output = $R->get('a');
print "Variable a = $output\n";

如果 R 中的变量是单个值，则此方法可以正常工作。但是，我无法传递向量。我很可能错过了一个简单的概念，但在这里找不到任何文档或其他问题。对我来说，由此产​​生的文本毫无意义。 Variable a = ARRAY(0x7fcbd9b26ff8)

我的丑陋替代方案是让 R 写出包含信息的文本文件，然后让 Perl 读回解析文本。必须有一种更简单的方法。

---

这是简化版本。我想将字符串值的列表/向量发送到 Perl，该列表/向量将根据用户输入而变化。我当前的项目设置为以 Perl 为界面(我对 Perl 不是最好的)，而 R 与数据库动态交互。

Answer 1

看起来 $output 不是一个数组，而是一个数组引用。

尝试取消引用它:

print @$output;

或者:

use Data::Dumper;
print $output;

这将显示内容。不过，您需要迭代该数组才能用它做任何有建设性的事情:

print join ("\n", @$output ),"\n";