如何在 Windows 上集成 PHP 和 R？

集成 PHP 和 R 时遇到一些问题。我正在研究这篇文章：

http://www.r-bloggers.com/integrating-php-and-r/ http://www.r-bloggers.com/integrating-php-and-r/

R 已安装并通过我们的 R 脚本进行验证：

Rscript C:\inetpub\wwwroot\client\includes\decisionTreePredictor.R 20 10 O 1000 10000 5000 0.2 10.2

打印计算结果的单个值：

[1] "0"

（Rscript.exe的路径在Windows环境变量中设置）

我有一个使用 exec() 的 PHP 脚本，该脚本使用以下命令成功测试：

$result = exec('dir',$output,$returnVar);
echo "<br>result ". print_r($result,true);
echo "<br>output <pre>". print_r($output,true) , "</pre>";
echo "<br>return ". print_r($returnVar,true);

返回：

result 2 Dir(s) 117,749,354,496 bytes free
output 
Array
(
    [0] =>  Volume in drive C is C_DRIVE
    [1] =>  Volume Serial Number is 7EB2-A074
    [2] => 
    [3] =>  Directory of C:\inetpub\wwwroot\client\temp
    [4] => 
    [5] => 05/17/2014  10:29 PM              .
    [6] => 05/17/2014  10:29 PM              ..
    [7] => 05/16/2014  09:24 AM             5,181 dbimporttest.php
    [8] => 05/17/2014  10:29 PM                 0 routput.txt
    [9] => 05/17/2014  11:42 PM               701 rscripttest.php
    [10] => 05/16/2014  04:59 PM               425 whoami.php
    [11] =>                4 File(s)          6,307 bytes
    [12] =>                2 Dir(s)  117,749,354,496 bytes free
)


return 0

当我尝试在 exec 命令中运行 R 脚本时，它失败：

$result = exec('Rscript.exe C:\inetpub\wwwroot\client\includes\decisionTreePredictor.R 20 10 O 1000 10000 5000 0.2 10.2',$output,$returnVar);
echo "<br>result ". print_r($result,true);
echo "<br>output <pre>". print_r($output,true) , "</pre>";
echo "<br>return ". print_r($returnVar,true);

返回：

result 
output 
Array
(
)


return 1

我在跑步：

• Windows Server 8 R2
• IIS 8
• PHP 5.5
• R 3.1

由于无法让 exec() 工作或输出可用的错误，我决定寻找替代途径。使用 COM 类似乎给了我我想要的东西。

这是最终的操作代码：

$command = 'C:\Program Files\R\R-3.1.0\bin\Rscript.exe C:\inetpub\wwwroot\client\includes\decisionTreePredictor.R 20 10 O 1000 10000 5000 0.2 10.2';
$pCom = new COM("WScript.Shell");
$pShell = $pCom->Exec($command);
$sStdOut = $pShell->StdOut->ReadAll;    # Standard output
$sStdErr = $pShell->StdErr->ReadAll;    # Error
echo "<pre>$sStdOut</pre>";

奇怪的是我无法让 exec() 来完成这项工作，因为这似乎是大多数讨论 R/PHP 集成的博主首选的解决方案。

无论如何，我希望这个解决方案可以帮助其他遇到我这种情况的人！

附：您需要确保扩展在 php.ini 中处于打开状态（安装时默认处于关闭状态）：extension=php_com_dotnet.dll