Вызвать rserve из тайм-аута клиента
Как мы вызываем rserve из rsclient? На стороне сервера у нас есть функция, которую нужно вызывать из rsclinet. Любой вызов rseval застревает - добавлен флаг "control-enable", но он все равно не работает. Спасибо
Kindly find below sample code
1. Server side - "rserve"
library(Rserve)
Rserve(port=6311,args="--RS-enable-control --RS-enable-remote --RS-settings")
2. Function present on server side as rscript - D:/axa/rsource/rsource/Functionaddition.R
sumFunc=function()
{
print("function invoked")
return(10)
}
3. Client (Rstudio) invoke function ("sumFunc")
library("RSclient")
c<- RSconnect(host = "localhost", port = 6311)
source <-RSserverSource(c,"D:/axa/rsource/rsource/Functionaddition.R")
RSserverEval(c,"z()")