跟大家講解下有關PHP中如何調用RScript腳本（附代碼），相信小伙伴們對這個話題應該也很關注吧，現在就為小伙伴們說說PHP中如何調用RScript腳本（附代碼），小編也收集到了有關PHP中如何調用RScript腳本（附代碼）的相關資料，希望大家看到了會喜歡。

這篇文章主要介紹了PHP中如何調用RScript腳本，有一定的參考價值，感興趣的朋友可以參考一下，希望對你有所幫助！

由于某個原因，需要在PHP中調用R語音進行繪制圖像。經過多方百度，目前大部分解決方案都是：利用PHP中的系統命令函數如exec，system，shell_exec等等來調用RScript腳本，常見的命令行有如下兩種

第一種：

exec("RScript " . $your_script_dir . "$your_RScript_file " . $args); // 里面有printf某個變量// echo ("RScript " . $your_script_dir . "$your_RScript_file " . $args);

第二種：

system("R --slave < " . $your_RScript_dir . "$your_RScript_file" . " --args " . $args); // 里面有printf某個變量// echo ("R --slave < " . $your_RScript_dir . "$your_RScript_file" . " --args " . $args);

接下來，我們滿懷信心地去運行PHP的時候，會發現我們所執行系統命令返回的值是1，也就是失敗。但是，我們拿echo出來的語句去cmd窗口執行，發現是可以printf出結果，并且也生成了我想要的圖像。這是為什么呢？經過多方百度跟嘗試，終于找到解決方案。供大家參考并歡迎大家如果有更好的方法，也在評論區中發文，大家共同努力進步。

一、簡單看下失敗的調用情況

這是我在PHP中調用的R腳本的語句，下面是在瀏覽器中調用的結果。

我們再將echo出來的語句，在cmd中執行下。結果如下：

生成的文件如下：

可以看到，我最后想要得到的$plotName是null，也就是沒有執行成功，或者沒有得到cmd中打印出來的文件信息。

二、解決方法

提供一個PHP插件，名字叫RServe，這個你如果是用Java來調用R語言的，想必并不陌生。現在出了PHP版本的，我們就可以拿過來使用。下載地址：Rserve-php

三、如何使用

當然，該插件有中間也有一些簡單的例子，可以自行參考理解。下面放出我的解決方法：本人是基于ThinkPHP5的框架實現的。

1. 我們首先要將它加入到我們的項目中，我把該插件放到我的vendor里。添加如下代碼：

require_once ROOT_PATH . 'vendor/rserve/autoload.php';2. 根據自身需要使用里面的一些類use Sentiweb\Rserve\Connection; // 連接R服務的類use Sentiweb\Rserve\Evaluator; // 簡單的理解為：建立連接后返回的處理器use Sentiweb\Rserve\REXP\Vector; // 內置的存儲容器3. 編寫RScript腳本

我們需要將之前所編寫的腳本，修改為R語言的函數。格式如下：

RScript <- function(arg1, ...， argN) { # code... 請無視這種注釋方式，R語言沒有注釋 return output # 該函數的返回值}

為后期我們利用Rserve插件調用。

4. 編寫我們的PHP函數

我們為了后期方便調用，將調用RScript腳本的功能統一寫到一個函數里面，方便閱讀且容易維護。

class Common { // $source 表示自己編寫的R語言函數文件 // $file, $cancer：本R函數所需要參數 function RScript($source, $file, $cancer) { $cnx = new Connection(RSERVE_HOST); // 與RSERVE_HOST建立連接，一般為自己服務器地址，如果本地，則為localhost $eval = new Evaluator($cnx, Evaluator::PARSER_REXP); // 通過連接，生成處理器，后一個參數決定連接失敗時返回錯誤信息 $eval->evaluate("source('$source')"); // 類似library，將函數載入R的編程環境中；evaluate計算括號內的R命令 // 同理，執行R命令，注意括號內是字符串的形式，由于返回的是RServe的Rstring類，為了拿到我想要的信息，通過Vector類的toHTML轉為含return信息的標簽語言 $RString = $eval->evaluate("RScript('$file', '$cancer')")->toHTML(); preg_match("/$cancer.+.pdf/", $RString, $fileName); // 提煉信息 return $fileName[0]; // 返回結果 }}5. 成功實現

這里我就不展示我的最終結果了，有這需要的同學們可以自己嘗試。

四、失敗的原因

由于項目時間緊迫，對PHP、R語言熟悉度不高，不明白為什么直接調用命令執行的結果是失敗的。有這方面認識的小伙伴們，可以在評論里回復我。以上就是我關于PHP如何調用R語言腳本的全部解決方案。謝謝大家的閱讀。

更多相關視頻教程請訪問 php編程從入門到精通全套視頻教程

來源：php中文網