Я попытался передать переменные php для использования в RScript. Но я запутался, чтобы поймать, что переменные php в R
Вот мой код PHP
<?php
if(isset($que) && isset($cekque))
{
$N1 = $que;
$N2 = $cekque;
exec("Rscript QC.R $N1 $N2");
$nocache = rand();
echo("<img src='temp2.png?$nocache'/>");
}
?>
Вот мой Rscript
args <- commandArgs(TRUE)
N1 <- args[1]
N2 <- args[2]
data0<-dbGetQuery(con,N1)
jml <-dbGetQuery(con,N2)
rataan<-mean(as.numeric(data0$round))
sd<-sd(as.numeric(data0$round))
ewma(data0,jml$count,rataan,sd,0.2,3,plot=TRUE)
dev.copy(png,'C:\\xampp\\htdocs\\AMQC\\Code\\CodeElbert\\temp.png',width = 716, height = 439)
dev.off()
Но ошибка все равно появляется.
И изображение будет показано так
Любая помощь? Я думал, что мой Rscript был неправильным. Спасибо
Задача ещё не решена.
Других решений пока нет …