NgetFinalResultsNonBlocking {rneos} | R Documentation |
This functions calls the XML-RPC method “getFinalResultsNonBlocking()” of NEOS, which gets results of a job submitted to NEOS. If the job is still running, then this function will return an empty string (base-64 encoded).
NgetFinalResultsNonBlocking(obj, convert = TRUE)
obj |
NeosJob, an object of class |
convert |
Logical, if |
An object of class NeosAns
.
Bernhard Pfaff
NEOS API: https://neos-server.org/neos/xml-rpc.html
NeosAns
and NsubmitJob
## Not run: tmp <-NgetSolverTemplate(category = "go", solvername = "ASA", inputMethod = "AMPL") ## setting path to example model and data file modf <- system.file("ExAMPL", "diet.mod", package = "rneos") datf <- system.file("ExAMPL", "diet.dat", package = "rneos") ## import of file contents modc <- paste(paste(readLines(modf), collapse = "\n"), "\n") datc <- paste(paste(readLines(datf), collapse = "\n"), "\n") ## create list object argslist <- list(model = modc, data = datc, commands = "", comments = "") ## create XML string xmls <- CreateXmlString(neosxml = tmp, cdatalist = argslist) test <- NsubmitJob(xmlstring = xmls, user = "rneos", interface = "", id = 0) NgetFinalResultsNonBlocking(obj = test, convert = TRUE) ## End(Not run)