User Tools

Site Tools


tutorials:sensitivity-analysis-using-grolink-and-gror

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision
Previous revision
tutorials:sensitivity-analysis-using-grolink-and-gror [2025/06/06 17:07] – [Sensitivity analysis on GroIMP models using GroR] ttutorials:sensitivity-analysis-using-grolink-and-gror [2025/09/24 16:31] (current) t
Line 160: Line 160:
                          ){                          ){
   # Open workbench with model   # Open workbench with model
-  wb1 <- GroLink.open("http://localhost:58081/api", path="Example08_prepared.gsz")+  wb1 <- GroLink.open("http://localhost:58081/api", content readBin("D:/Example08_prepared.gsz", "raw", 10e6))
   # Override parameters.rgg with new values from params vector   # Override parameters.rgg with new values from params vector
   WBRef.updateFile(wb1, "param/parameters.rgg",   WBRef.updateFile(wb1, "param/parameters.rgg",
Line 217: Line 217:
  
 {{:tutorials:rplot.png?500|}} {{:tutorials:rplot.png?500|}}
 +
 +
 +===== Dump of R code to grab datasets via API =====
 +<code R>
 +wb <- GroLink.open("http://localhost:58081/api",
 +               content = readBin("../GroIMP/volume_distance_estimate.gsz", "raw", 10e6) )
 +
 +GroR::WBRef.addNode(wb, content = readBin("tief12-treeqsm.qsm", "raw", 10e6), inp = "qsm")
 +
 +WBRef.runRGGFunction(wb, "run")
 +WBRef.runRGGFunction(wb, "calc")
 +WBRef.runRGGFunction(wb, "writeCSV")
 +
 +string <- WBRef.getDataset(wb,"voldist")
 +
 +out <- read.csv(textConnection(WBRef.getDataset(wb,"voldist")), sep = ",", header = F)
 +
 +WBRef.close(wb)
 +
 +plot(m)
 +</code>
 +
  
  
tutorials/sensitivity-analysis-using-grolink-and-gror.1749222469.txt.gz · Last modified: 2025/06/06 17:07 by t