Exemplo n.º 1
0
 private void writeResultsToSPOTProjectCache() {
   runCommand(
       "inputConfig$alg.currentResult <- read.table(textConnection(\""
           + currentRES.toString()
           + "\"), header=TRUE)",
       false);
 }
Exemplo n.º 2
0
 private void initResultHeading() {
   runCommand(
       "inputConfig$alg.currentResult <- read.table(textConnection(\""
           + currentRES.toString()
           + "\"), header=TRUE)",
       false);
 }
Exemplo n.º 3
0
 public void initSPOTConfFileName() {
   runCommand(
       "inputFile=paste(getwd(), \""
           + investigationId
           + ".conf\", sep = \""
           + File.separator
           + "\")",
       false);
 }
Exemplo n.º 4
0
 private void saveSPOTHistory() throws InPUTException {
   runCommand(
       "savehistory(file=paste(getwd(), \""
           + studyId
           + "\",\".Rhistory\", sep = \""
           + File.separator
           + "\"))",
       false);
 }
Exemplo n.º 5
0
 private void saveSPOTWorkspace() throws InPUTException {
   runCommand(
       "save.image(paste(getwd(), \""
           + studyId
           + "\", \".RData\", sep = \""
           + File.separator
           + "\"))",
       false);
   saveSPOTHistory();
 }
Exemplo n.º 6
0
 public void reset(String studyId) throws InPUTException {
   this.studyId = studyId;
   runCommand("rm(list=ls())", false);
 }
Exemplo n.º 7
0
 public void initSPOTSequentialDesign() {
   String command = "inputConfig<-spot(inputFile,\"seq\", spotConfig=inputConfig)";
   runCommand(command, false);
 }
Exemplo n.º 8
0
 public void initSPOTinitialDesign() {
   initInverseFunction();
   runCommand("inputConfig<-spot(inputFile,\"init\")", false);
 }
Exemplo n.º 9
0
 private void initInverseFunction() {
   runCommand(
       "source(textConnection(\"inverse<-function(x){v<-x\n if(x>0)v<-1/x\n return(v)}\"))",
       false);
 }
Exemplo n.º 10
0
 private void loadSPOTWorkspace() {
   runCommand(
       "load(paste(getwd(), \"" + studyId + "\", \".RData\", sep = \"" + File.separator + "\"))",
       false);
 }