Мне нужно запустить скрипт из php, получая данные из:
Вот мой сценарий:
library(pathview)
pv.out <- pathview(gene.data = gene.d,gene.idtype = geneid,cpd.data = cpd.d,cpd.idtype=cpdid,pathway.id = pathway,species = species,out.suffix = suffix,kegg.native = kegg,sign.pos =pos,same.layer = layer,keys.align = align,split.group = split,expand.node = expand,multi.state=multistate,match.data = matchd ,node.sum=nsum,key.pos = kpos,cpd.lab.offset= offset,limit = list(gene = glmt, cpd = clmt), bins = list(gene = gbins, cpd= cbins),low = list(gene = glow, cpd = clow),mid = list(gene = gmid, cpd = cmid), high = list(gene = ghigh, cpd =chigh),discrete = list(gene = gdisc, cpd = cdisc))
save.image("workenv.Rdata")
write.table(pv.out$plot.data.gene,file=paste(paste(paste("genedata.",species,sep=""),pathway,sep=""),".txt",sep=""),quote = FALSE)
write.table(pv.out$plot.data.cpd,file=paste(paste(paste("cpddata.",species,sep=""),pathway,sep=""),".txt",sep=""),quote = FALSE)
После долгих поисков в гугле и терпения я нашел решение. Сначала, чтобы загрузить библиотеку со стороны сервера, вам нужно настроить файл Rserv.conf. Если у вас нет файла Rserv.conf, вы можете создать его в папке /etc
(/etc/Rserv.conf) и напишите следующее: моя конфигурацияremote enable
encoding utf8
eval library(pathview)
source /home/ybhavnasi/Desktop/Script_Rserv.R
eval xx <- 1
port 6311
plaintext enable
и в php с использованием библиотеки php rserv на github (https://github.com/cturbelin/rserve-php) Я могу вызывать функцию для скриптов, загруженных сервером. вызов функции eval