[Robast-commits] r662 - in branches/robast-0.9/pkg: RobAStRDA/R RobExtremesBuffer

[noreply at r-forge.r-project.org]

Author: ruckdeschel
Date: 2013-05-24 17:48:39 +0200 (Fri, 24 May 2013)
New Revision: 662

Modified:
   branches/robast-0.9/pkg/RobAStRDA/R/sysdata.rda
   branches/robast-0.9/pkg/RobExtremesBuffer/DashaLMScripts.R
   branches/robast-0.9/pkg/RobExtremesBuffer/MishaLMScripts.R
Log:
inserted Dasha's and Misha's smoothers into RobAStRDA and slightly modified the respective scripts

Modified: branches/robast-0.9/pkg/RobAStRDA/R/sysdata.rda
===================================================================
(Binary files differ)

Modified: branches/robast-0.9/pkg/RobExtremesBuffer/DashaLMScripts.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremesBuffer/DashaLMScripts.R	2013-05-14 12:15:08 UTC (rev 661)
+++ branches/robast-0.9/pkg/RobExtremesBuffer/DashaLMScripts.R	2013-05-24 15:48:39 UTC (rev 662)
@@ -33,7 +33,46 @@
 # *   RobRex
 #
 ## evtl naechste Zeile modifizieren
+### preparations:
+# (0) R-forge checkout von distr und robast machen; Pakete installieren
+######
+# Reihenfolge
+#### *: von r-forge, **: von CRAN, ***: von BioConductor
+# vorab:
+# CRAN: **  sfsmisc, setRNG, fBasics, fGarch, mvtnorm, lattice, RColorBrewer
+# BioConductor: *** Biobase, affy, beadarray
+# source("http://bioconductor.org/biocLite.R")
+# biocLite()
+# biocLite(c("affy", "beadarray"))
+#
+# *   RobAStRDA
+# *   startupmsg
+# *   SweaveListingUtils
+# *   distr
+# *   distrEx
+# *   distrTeach
+# *   distrRmetrics
+# *   distrSim
+# *   distrEllipse
+# *   distrTEst
+# *   RandVar
+# *   distrMod
+# *   distrDoc
+# *   RobAStBase
+# *   ROptEst
+# *   RobExtremes
+# *   RobLox
+# *   RobLoxBioC
+# *   ROptEstOld
+# *   ROptRegTS
+# *   RobRex
+#
+## evtl naechste Zeile modifizieren
+#Peter
+baseDir0 <- "C:/rtest/RobASt"
+#Dasha
 baseDir0 <- "D:/Mathematics/KL-PhD/robast"
+
 interpolDir <- "branches/robast-0.9/pkg/RobExtremes/inst/AddMaterial/interpolation"
 interpolFile <- "plotInterpol.R"
 ##
@@ -85,8 +124,8 @@
 myRDA <- file.path(.basepath,"RobAStRDA/R/sysdata.rda")
 CSVFiles <- grep("\\.csv$", dir(.myFolderFrom), value=TRUE)
 CSVFiles <- paste(.myFolderFrom, CSVFiles, sep="/")
-CSVFiles2 <- file.path(.myFolderFrom,"interpolMBREGEVFamily.csv")
-CSVFiles3 <- file.path(.myFolderFrom,"interpolMBREGammafamily.csv")
+CSVFiles2 <- file.path(.myFolderFrom,"interpolMBREGeneralizedParetoFamily.csv")
+CSVFiles3 <- file.path(.myFolderFrom,"interpolMBREWeibullfamily.csv")
 file.copy(from=myRDA,to=myRDA1)
 
 ### 1. Runde
@@ -172,4 +211,4 @@
   myRDA <- file.path(.basepath,"RobAStRDA/R/sysdata.rda")
   require(RobAStRDA)
   RobAStRDA:::.computeInterpolators(myRDA, myRDA,withSmoothFct = TRUE)
-}
\ No newline at end of file
+}

Modified: branches/robast-0.9/pkg/RobExtremesBuffer/MishaLMScripts.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremesBuffer/MishaLMScripts.R	2013-05-14 12:15:08 UTC (rev 661)
+++ branches/robast-0.9/pkg/RobExtremesBuffer/MishaLMScripts.R	2013-05-24 15:48:39 UTC (rev 662)
@@ -33,6 +33,44 @@
 # *   RobRex
 #
 ## evtl naechste Zeile modifizieren
+### preparations:
+# (0) R-forge checkout von distr und robast machen; Pakete installieren
+######
+# Reihenfolge
+#### *: von r-forge, **: von CRAN, ***: von BioConductor
+# vorab:
+# CRAN: **  sfsmisc, setRNG, fBasics, fGarch, mvtnorm, lattice, RColorBrewer
+# BioConductor: *** Biobase, affy, beadarray
+# source("http://bioconductor.org/biocLite.R")
+# biocLite()
+# biocLite(c("affy", "beadarray"))
+#
+# *   RobAStRDA
+# *   startupmsg
+# *   SweaveListingUtils
+# *   distr
+# *   distrEx
+# *   distrTeach
+# *   distrRmetrics
+# *   distrSim
+# *   distrEllipse
+# *   distrTEst
+# *   RandVar
+# *   distrMod
+# *   distrDoc
+# *   RobAStBase
+# *   ROptEst
+# *   RobExtremes
+# *   RobLox
+# *   RobLoxBioC
+# *   ROptEstOld
+# *   ROptRegTS
+# *   RobRex
+#
+## evtl naechste Zeile modifizieren
+#Peter
+baseDir0 <- "C:/rtest/RobASt"
+#Misha
 baseDir0 <- "D:/SVN repositories/robast"
 interpolDir <- "branches/robast-0.9/pkg/RobExtremes/inst/AddMaterial/interpolation"
 interpolFile <- "plotInterpol.R"
@@ -45,51 +83,51 @@
 #     if(trace) cat("\n")
 #   }
 # }
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/RandVar/R/"
 # setwd(path)
 # sourceDir(path)
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/RobAStBase/R/"
 # setwd(path)
 # sourceDir(path)
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/RobAStRDA/R/"
 # setwd(path)
 # sourceDir(path)
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/RobExtremes/R/"
 # setwd(path)
 # sourceDir(path)
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/RobExtremesBuffer/R/"
 # setwd(path)
 # sourceDir(path)
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/RobLox/R/"
 # setwd(path)
 # sourceDir(path)
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/RobLoxBioC/R/"
 # setwd(path)
 # sourceDir(path)
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/RobRex/R/"
 # setwd(path)
 # sourceDir(path)
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/ROptEst/R/"
 # setwd(path)
 # sourceDir(path)
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/ROptEstOld/R/"
 # setwd(path)
 # sourceDir(path)
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/ROptReg/R/"
 # setwd(path)
 # sourceDir(path)
-# 
+#
 # path = "D:/SVN repositories/robast/branches/robast-0.9/pkg/ROptRegTS/R/"
 # setwd(path)
 # sourceDir(path)