Package org.rosuda.JRI

Examples of org.rosuda.JRI.REXP

203
204
205
206
207
208
209
210
211
212
  }

  protected static REXP eval(String whatToEval, String errMsg)
  {
    callbacks.clearBuffer();
    REXP result = engine.eval(whatToEval);
    if (result == null)
      throw new IllegalArgumentException(errMsg+" : "+callbacks.getBuffer());
    return result;
  }
View Full Code Here
350
351
352
353
354
355
356
357
358
359
360
361
362
        {
          if (RViewer.getGraph(title) == null)
          {// create new graph
            RViewer.setNewGraphName(title);
            eval("JavaGD(\"aa\")","JavaGD() failed");
            REXP devNum = eval("dev.cur()","failed to do dev.cur");
           
            RViewer.getGraph(title).init(devNum.asInt()-1);
          }
          eval("dev.set("+(RViewer.getGraph(title).getDeviceNumber()+1)+")","failed to do dev.set for "+title);
          for(String cmd:dataToPlot)
            eval(cmd,"failed to run plot "+cmd);
        }
View Full Code Here
108
109
110
111
112
113
114
115
116
117
118
119
120
   
    //Get model name out of file
    this.engine.eval("modelname<-load('"+ this.modelFile.getFile().getPath());
    String modelName = this.engine.eval("modelname").asString();
   
    REXP rResult = this.engine.eval("predict(" + modelName + "," + rParamaterAssignString);
   
    if(rResult == null || rResult.getType() == REXP.XT_NULL) {
      result.addError("Empty R result, model has an error");
    } else {
      Map<String, Object> tempPredictions = new HashMap<String, Object>();
      this.processRResult(rResult, tempPredictions, "result");
    }
View Full Code Here
150
151
152
153
154
155
156
157
158
159
160
161
        }
        return ret;
    }

    public static String[] evalStrings(String evalstr) {
        REXP x = getRengine().eval(evalstr);

        if (x != null && x.asStringArray() != null) {
            return x.asStringArray(); 
        }
        return null;
    }
View Full Code Here
159
160
161
162
163
164
165
166
167
168
169
170
        }
        return null;
    }
 
    public static String evalString(String evalstr) {
        REXP x = getRengine().eval(evalstr);

        if (x != null && x.asStringArray() != null) {
            return x.asStringArray()[1]; 
        }
        return "lala";
    }
View Full Code Here
168
169
170
171
172
173
174
175
176
177
178
179
        }
        return "lala";
    }
 
    public static double[] evalDoubles(String evalstr) {
        REXP x = getRengine().eval(evalstr);

        if (x != null && x.asDoubleArray() != null) {
            return x.asDoubleArray(); 
        }
        return null;
    }
View Full Code Here
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
        }
        return null;
    }
 
    public static Double evalDouble(String evalstr) {
        REXP x = getRengine().eval(evalstr);

        if (x != null && x.asDoubleArray() != null) {
            // TODO: try sinnvoll?
            try {
                return x.asDoubleArray()[0]; 
            } catch (Exception e) {
                return 0.0;
            }
        }
        return 0.0;
View Full Code Here
191
192
193
194
195
196
197
198
199
200
201
202
203
        }
        return 0.0;
    }
 
    public static int evalInt(String evalstr) {
        REXP x = getRengine().eval(evalstr);

        if (x != null && x.asIntArray() != null) {
            return x.asIntArray()[0];
        } 
        log.error("Error while evaling" + evalstr);
        return -1;
    }
View Full Code Here
201
202
203
204
205
206
207
208
209
210
211
212
213
        log.error("Error while evaling" + evalstr);
        return -1;
    }
 
    public static boolean evalBool(String evalstr) {
        REXP x = getRengine().eval(evalstr);

        if (x != null && x.asBool() != null) {
            return x.asBool().isTRUE();
        } 
        log.error("Error while evaling" + evalstr);
        return false;
    }
View Full Code Here
393
394
395
396
397
398
399
400
401
402
403
404
405
      // Get the peak list.
      rEngine.eval("peakList <- getPeaklist(an)", false);

      // Extract the pseudo-spectra and isotope annotations from the peak
      // list.
      final REXP spectraExp = rEngine
          .eval("as.integer(peakList$pcgroup)");
      final REXP isotopeExp = rEngine.eval("peakList$isotopes");

      // Add identities.
      if (spectraExp != null) {

        addPseudoSpectraIdentities(peaks, spectraExp, isotopeExp);
View Full Code Here
TOP

Related Classes of org.rosuda.JRI.REXP

  • businesslogic.RInterface
  • com.cloutree.modelevaluator.impl.r.RPredictiveModel
  • dao.RCommand
  • net.sf.mzmine.modules.peaklistmethods.identification.camera.CameraSearchTask
  • net.sf.mzmine.modules.peaklistmethods.peakpicking.deconvolution.centwave.CentWaveDetector
  • rstatistics.RExpressionLocal
  • rtest
  • statechum.analysis.learning.DrawGraphs
  • study.access.jri.rtest
    • Copyright © 2018 www.massapicom. All rights reserved.
    All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.