一个矩阵文件加载到Perl中

Question

我有一个方形矩阵文件，我想将它加载到Perl中。我想像二维数组一样操作，在C中就像矩阵[14] [50]，然后它直接进入第14行第50列。有没有办法做到这一点？

我可以直接修改输入文件，还是必须将其加载到变量中，执行操作然后将其写出来？

Answer 1

我写过一个可能能够做你需要的模块。 Tie::Array::CSV。它创建了一个神奇的arrayrefs数组（Perl 2D数组），允许行和元素r / w访问文件。您可能需要调整选项（CSV是默认值），具体取决于列分隔符。

Answer 2

它的工作方式非常相似，语法不同。

>matrix <- array(1:10000, dim=c(100,100)) #50 X 50 matrix
>somevariable <- matrix[14,51] #somevariable will now be 5014

将其转换为R脚本

并从perl调用它，例如

my $var = `rscript arguments`; # $var is now the output of your rscript