From noreply at r-forge.r-project.org  Sun May  3 10:48:37 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 10:48:37 +0200 (CEST)
Subject: [Robast-commits] r807 - in branches/robast-1.0/pkg/RandVar: . man
Message-ID: <20150503084837.D85E0186A47@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 10:48:37 +0200 (Sun, 03 May 2015)
New Revision: 807

Modified:
   branches/robast-1.0/pkg/RandVar/DESCRIPTION
   branches/robast-1.0/pkg/RandVar/man/0RandVar-package.Rd
Log:
update of package DESCRIPTION and Rd file

Modified: branches/robast-1.0/pkg/RandVar/DESCRIPTION
===================================================================
--- branches/robast-1.0/pkg/RandVar/DESCRIPTION	2015-01-15 23:39:40 UTC (rev 806)
+++ branches/robast-1.0/pkg/RandVar/DESCRIPTION	2015-05-03 08:48:37 UTC (rev 807)
@@ -1,14 +1,13 @@
 Package: RandVar
 Version: 1.0
-Date: 2013-09-12
+Date: 2015-05-03
 Title: Implementation of Random Variables
-Description: implements random variables by means of S4 classes and methods.
+Description: Implements random variables by means of S4 classes and methods.
 Depends: R (>= 2.14.0), methods, distr(>= 2.5.2), distrEx(>= 2.5)
 Imports: startupmsg
 Authors at R: c(person("Matthias", "Kohl", role=c("cre", "cph"), email="Matthias.Kohl at stamats.de"), 
 		person("Peter", "Ruckdeschel", role=c("aut", "cph")))
 ByteCompile: yes
-LazyLoad: yes
 License: LGPL-3
 Encoding: latin1
 URL: http://robast.r-forge.r-project.org/

Modified: branches/robast-1.0/pkg/RandVar/man/0RandVar-package.Rd
===================================================================
--- branches/robast-1.0/pkg/RandVar/man/0RandVar-package.Rd	2015-01-15 23:39:40 UTC (rev 806)
+++ branches/robast-1.0/pkg/RandVar/man/0RandVar-package.Rd	2015-05-03 08:48:37 UTC (rev 807)
@@ -3,7 +3,7 @@
 \alias{RandVar}
 \docType{package}
 \title{
-Implementation of random variables
+Implementation of Random Variables
 }
 \description{
 Implementation of random variables by means of S4 classes and methods.
@@ -12,11 +12,11 @@
 \tabular{ll}{
 Package: \tab RandVar \cr
 Version: \tab 1.0 \cr
-Date: \tab 2013-09-12 \cr
+Date: \tab 2015-05-03 \cr
 Depends: \tab R (>= 2.14.0), methods, distr(>= 2.5.2), distrEx(>=
 2.5)\cr
+Imports: \tab startupmsg \cr
 ByteCompile: \tab yes \cr
-LazyLoad: \tab yes \cr
 License: \tab LGPL-3 \cr
 URL: \tab http://robast.r-forge.r-project.org/\cr
 SVNRevision: \tab -Inf \cr


From noreply at r-forge.r-project.org  Sun May  3 10:56:39 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 10:56:39 +0200 (CEST)
Subject: [Robast-commits] r808 - in branches/robast-1.0/pkg/RandVar/tests: .
	Examples
Message-ID: <20150503085639.A2FB71878DA@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 10:56:39 +0200 (Sun, 03 May 2015)
New Revision: 808

Modified:
   branches/robast-1.0/pkg/RandVar/tests/Examples/RandVar-Ex.Rout.save
   branches/robast-1.0/pkg/RandVar/tests/tests.Rout.save
Log:
updated Rout.save files

Modified: branches/robast-1.0/pkg/RandVar/tests/Examples/RandVar-Ex.Rout.save
===================================================================
--- branches/robast-1.0/pkg/RandVar/tests/Examples/RandVar-Ex.Rout.save	2015-05-03 08:48:37 UTC (rev 807)
+++ branches/robast-1.0/pkg/RandVar/tests/Examples/RandVar-Ex.Rout.save	2015-05-03 08:56:39 UTC (rev 808)
@@ -1,6 +1,6 @@
 
-R version 3.0.3 Patched (2014-03-06 r65149) -- "Warm Puppy"
-Copyright (C) 2014 The R Foundation for Statistical Computing
+R Under development (unstable) (2015-05-02 r68310) -- "Unsuffered Consequences"
+Copyright (C) 2015 The R Foundation for Statistical Computing
 Platform: x86_64-unknown-linux-gnu (64-bit)
 
 R is free software and comes with ABSOLUTELY NO WARRANTY.
@@ -20,31 +20,19 @@
 > pkgname <- "RandVar"
 > source(file.path(R.home("share"), "R", "examples-header.R"))
 > options(warn = 1)
-> base::assign(".ExTimings", "RandVar-Ex.timings", pos = 'CheckExEnv')
-> base::cat("name\tuser\tsystem\telapsed\n", file=base::get(".ExTimings", pos = 'CheckExEnv'))
-> base::assign(".format_ptime",
-+ function(x) {
-+   if(!is.na(x[4L])) x[1L] <- x[1L] + x[4L]
-+   if(!is.na(x[5L])) x[2L] <- x[2L] + x[5L]
-+   options(OutDec = '.')
-+   format(x[1L:3L], digits = 7L)
-+ },
-+ pos = 'CheckExEnv')
-> 
-> ### * </HEADER>
 > library('RandVar')
 Loading required package: distr
 Loading required package: startupmsg
-:startupmsg>  Utilities for start-up messages (version 0.9)
+:startupmsg>  Utilities for Start-Up Messages (version 0.9.1)
 :startupmsg> 
 :startupmsg>  For more information see ?"startupmsg",
 :startupmsg>  NEWS("startupmsg")
 
 Loading required package: sfsmisc
 Loading required package: SweaveListingUtils
-:SweaveListingUtils>  Utilities for Sweave together with
-:SweaveListingUtils>  TeX listings package (version
-:SweaveListingUtils>  0.6.1)
+:SweaveListingUtils>  Utilities for Sweave Together with
+:SweaveListingUtils>  TeX 'listings' Package (version
+:SweaveListingUtils>  0.7)
 :SweaveListingUtils> 
 :SweaveListingUtils>  NOTE: Support for this package
 :SweaveListingUtils>  will stop soon.
@@ -76,8 +64,8 @@
 
     library, require
 
-:distr>  Object oriented implementation of distributions (version
-:distr>  2.5.2)
+:distr>  Object Oriented Implementation of Distributions (version
+:distr>  2.6)
 :distr> 
 :distr>  Attention: Arithmetics on distribution objects are
 :distr>  understood as operations on corresponding random variables
@@ -103,7 +91,7 @@
     df, qqplot, sd
 
 Loading required package: distrEx
-:distrEx>  Extensions of package distr (version 2.5)
+:distrEx>  Extensions of Package 'distr' (version 2.6)
 :distrEx> 
 :distrEx>  Note: Packages "e1071", "moments", "fBasics" should be
 :distrEx>  attached /before/ package "distrEx". See
@@ -126,7 +114,7 @@
 
     IQR, mad, median, var
 
-:RandVar>  Implementation of random variables (version 1.0)
+:RandVar>  Implementation of Random Variables (version 1.0)
 :RandVar> 
 :RandVar>  For more information see ?"RandVar", NEWS("RandVar"), as
 :RandVar>  well as
@@ -142,9 +130,8 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: RandVar-package
-> ### Title: Implementation of random variables
+> ### Title: Implementation of Random Variables
 > ### Aliases: RandVar-package RandVar
 > ### Keywords: package
 > 
@@ -155,15 +142,12 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("0RandVar-package", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("EuclRandMatrix-class")
 > ### * EuclRandMatrix-class
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EuclRandMatrix-class
 > ### Title: Euclidean random matrix
 > ### Aliases: EuclRandMatrix-class
@@ -230,7 +214,7 @@
     }
     t(f(x))
 }
-<environment: 0x4f14828>
+<environment: 0x57297d8>
 
 > 
 > R2 <- EuclRandMatrix(Map = L2, ncol = 2, Domain = Reals(), dimension = 1)
@@ -259,7 +243,7 @@
     }
     gamma(f1(x))
 }
-<environment: 0x4d8d100>
+<environment: 0x3a75e10>
 
 [[2]]
 function (x) 
@@ -270,7 +254,7 @@
     }
     gamma(f1(x))
 }
-<environment: 0x4d8d100>
+<environment: 0x3a75e10>
 
 [[3]]
 function (x) 
@@ -281,7 +265,7 @@
     }
     gamma(f1(x))
 }
-<environment: 0x4d8d100>
+<environment: 0x3a75e10>
 
 [[4]]
 function (x) 
@@ -292,7 +276,7 @@
     }
     gamma(f1(x))
 }
-<environment: 0x4d8d100>
+<environment: 0x3a75e10>
 
 > 
 > ## "Arith" group
@@ -306,7 +290,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4c8eef8>
+<environment: 0x39044a0>
 
 [[2]]
 function (x) 
@@ -317,7 +301,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4c8eef8>
+<environment: 0x39044a0>
 
 [[3]]
 function (x) 
@@ -328,7 +312,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4c8eef8>
+<environment: 0x39044a0>
 
 [[4]]
 function (x) 
@@ -339,7 +323,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4c8eef8>
+<environment: 0x39044a0>
 
 [[5]]
 function (x) 
@@ -350,7 +334,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4c8eef8>
+<environment: 0x39044a0>
 
 [[6]]
 function (x) 
@@ -361,7 +345,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4c8eef8>
+<environment: 0x39044a0>
 
 > Map(R2 * R2)
 [[1]]
@@ -377,7 +361,7 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x51f00d8>
+<environment: 0x30af4f8>
 
 [[2]]
 function (x) 
@@ -392,7 +376,7 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x51f00d8>
+<environment: 0x30af4f8>
 
 [[3]]
 function (x) 
@@ -407,7 +391,7 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x51f00d8>
+<environment: 0x30af4f8>
 
 [[4]]
 function (x) 
@@ -422,20 +406,17 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x51f00d8>
+<environment: 0x30af4f8>
 
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EuclRandMatrix-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("EuclRandMatrix")
 > ### * EuclRandMatrix
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EuclRandMatrix
 > ### Title: Generating function for EuclRandMatrix-class
 > ### Aliases: EuclRandMatrix
@@ -476,7 +457,7 @@
     }
     t(f(x))
 }
-<environment: 0x5195fc8>
+<environment: 0x5854bc0>
 
 > 
 > R2 <- EuclRandMatrix(Map = L2, ncol = 2, Domain = Reals(), dimension = 1)
@@ -503,7 +484,7 @@
     }
     gamma(f1(x))
 }
-<environment: 0x4b74f28>
+<environment: 0x6010e48>
 
 [[2]]
 function (x) 
@@ -514,7 +495,7 @@
     }
     gamma(f1(x))
 }
-<environment: 0x4b74f28>
+<environment: 0x6010e48>
 
 [[3]]
 function (x) 
@@ -525,7 +506,7 @@
     }
     gamma(f1(x))
 }
-<environment: 0x4b74f28>
+<environment: 0x6010e48>
 
 [[4]]
 function (x) 
@@ -536,7 +517,7 @@
     }
     gamma(f1(x))
 }
-<environment: 0x4b74f28>
+<environment: 0x6010e48>
 
 > 
 > ## "Arith" group
@@ -550,7 +531,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4685060>
+<environment: 0x5fde018>
 
 [[2]]
 function (x) 
@@ -561,7 +542,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4685060>
+<environment: 0x5fde018>
 
 [[3]]
 function (x) 
@@ -572,7 +553,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4685060>
+<environment: 0x5fde018>
 
 [[4]]
 function (x) 
@@ -583,7 +564,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4685060>
+<environment: 0x5fde018>
 
 [[5]]
 function (x) 
@@ -594,7 +575,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4685060>
+<environment: 0x5fde018>
 
 [[6]]
 function (x) 
@@ -605,7 +586,7 @@
     }
     2/f2(x)
 }
-<environment: 0x4685060>
+<environment: 0x5fde018>
 
 > Map(R2 * R2)
 [[1]]
@@ -621,7 +602,7 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x5224578>
+<environment: 0x5f86bb8>
 
 [[2]]
 function (x) 
@@ -636,7 +617,7 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x5224578>
+<environment: 0x5f86bb8>
 
 [[3]]
 function (x) 
@@ -651,7 +632,7 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x5224578>
+<environment: 0x5f86bb8>
 
 [[4]]
 function (x) 
@@ -666,7 +647,7 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x5224578>
+<environment: 0x5f86bb8>
 
 > 
 > 
@@ -704,15 +685,12 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EuclRandMatrix", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("EuclRandVarList-class")
 > ### * EuclRandVarList-class
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EuclRandVarList-class
 > ### Title: List of Euclidean random variables
 > ### Aliases: EuclRandVarList-class numberOfMaps
@@ -787,7 +765,7 @@
     }
     exp(f1(x))
 }
-<environment: 0x5174bb8>
+<environment: 0x59a4bc0>
 
 [[2]]
 function (x) 
@@ -798,7 +776,7 @@
     }
     exp(f1(x))
 }
-<environment: 0x5174bb8>
+<environment: 0x59a4bc0>
 
 [[3]]
 function (x) 
@@ -809,7 +787,7 @@
     }
     exp(f1(x))
 }
-<environment: 0x5174bb8>
+<environment: 0x59a4bc0>
 
 [[4]]
 function (x) 
@@ -820,7 +798,7 @@
     }
     exp(f1(x))
 }
-<environment: 0x5174bb8>
+<environment: 0x59a4bc0>
 
 > 
 > ## "Arith" group
@@ -834,7 +812,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x4c2f6d0>
+<environment: 0x570c1f0>
 
 [[2]]
 function (x) 
@@ -845,7 +823,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x4c2f6d0>
+<environment: 0x570c1f0>
 
 [[3]]
 function (x) 
@@ -856,7 +834,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x4c2f6d0>
+<environment: 0x570c1f0>
 
 [[4]]
 function (x) 
@@ -867,7 +845,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x4c2f6d0>
+<environment: 0x570c1f0>
 
 > Map((RL1 * 2)[[2]])
 [[1]]
@@ -879,7 +857,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x51c04d0>
+<environment: 0x52f40b8>
 
 [[2]]
 function (x) 
@@ -890,7 +868,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x51c04d0>
+<environment: 0x52f40b8>
 
 [[3]]
 function (x) 
@@ -901,7 +879,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x51c04d0>
+<environment: 0x52f40b8>
 
 [[4]]
 function (x) 
@@ -912,7 +890,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x51c04d0>
+<environment: 0x52f40b8>
 
 [[5]]
 function (x) 
@@ -923,7 +901,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x51c04d0>
+<environment: 0x52f40b8>
 
 [[6]]
 function (x) 
@@ -934,7 +912,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x51c04d0>
+<environment: 0x52f40b8>
 
 > Map((RL1 / RL1)[[3]])
 [[1]]
@@ -950,7 +928,7 @@
     }
     f1(x)/f2(x)
 }
-<environment: 0x4b267f8>
+<environment: 0x4bef158>
 
 [[2]]
 function (x) 
@@ -965,7 +943,7 @@
     }
     f1(x)/f2(x)
 }
-<environment: 0x4b267f8>
+<environment: 0x4bef158>
 
 [[3]]
 function (x) 
@@ -980,7 +958,7 @@
     }
     f1(x)/f2(x)
 }
-<environment: 0x4b267f8>
+<environment: 0x4bef158>
 
 [[4]]
 function (x) 
@@ -995,20 +973,17 @@
     }
     f1(x)/f2(x)
 }
-<environment: 0x4b267f8>
+<environment: 0x4bef158>
 
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EuclRandVarList-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("EuclRandVarList")
 > ### * EuclRandVarList
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EuclRandVarList
 > ### Title: Generating function for EuclRandVarList-class
 > ### Aliases: EuclRandVarList
@@ -1064,7 +1039,7 @@
     }
     exp(f1(x))
 }
-<environment: 0x5260230>
+<environment: 0x431ca18>
 
 [[2]]
 function (x) 
@@ -1075,7 +1050,7 @@
     }
     exp(f1(x))
 }
-<environment: 0x5260230>
+<environment: 0x431ca18>
 
 [[3]]
 function (x) 
@@ -1086,7 +1061,7 @@
     }
     exp(f1(x))
 }
-<environment: 0x5260230>
+<environment: 0x431ca18>
 
 [[4]]
 function (x) 
@@ -1097,7 +1072,7 @@
     }
     exp(f1(x))
 }
-<environment: 0x5260230>
+<environment: 0x431ca18>
 
 > 
 > ## "Arith" group
@@ -1111,7 +1086,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x50dfa40>
+<environment: 0x4022010>
 
 [[2]]
 function (x) 
@@ -1122,7 +1097,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x50dfa40>
+<environment: 0x4022010>
 
 [[3]]
 function (x) 
@@ -1133,7 +1108,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x50dfa40>
+<environment: 0x4022010>
 
 [[4]]
 function (x) 
@@ -1144,7 +1119,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x50dfa40>
+<environment: 0x4022010>
 
 > Map((RL1 * 2)[[2]])
 [[1]]
@@ -1156,7 +1131,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x521eb18>
+<environment: 0x3d20608>
 
 [[2]]
 function (x) 
@@ -1167,7 +1142,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x521eb18>
+<environment: 0x3d20608>
 
 [[3]]
 function (x) 
@@ -1178,7 +1153,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x521eb18>
+<environment: 0x3d20608>
 
 [[4]]
 function (x) 
@@ -1189,7 +1164,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x521eb18>
+<environment: 0x3d20608>
 
 [[5]]
 function (x) 
@@ -1200,7 +1175,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x521eb18>
+<environment: 0x3d20608>
 
 [[6]]
 function (x) 
@@ -1211,7 +1186,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x521eb18>
+<environment: 0x3d20608>
 
 > Map((RL1 / RL1)[[3]])
 [[1]]
@@ -1227,7 +1202,7 @@
     }
     f1(x)/f2(x)
 }
-<environment: 0x4beba28>
+<environment: 0x39d66c8>
 
 [[2]]
 function (x) 
@@ -1242,7 +1217,7 @@
     }
     f1(x)/f2(x)
 }
-<environment: 0x4beba28>
+<environment: 0x39d66c8>
 
 [[3]]
 function (x) 
@@ -1257,7 +1232,7 @@
     }
     f1(x)/f2(x)
 }
-<environment: 0x4beba28>
+<environment: 0x39d66c8>
 
 [[4]]
 function (x) 
@@ -1272,7 +1247,7 @@
     }
     f1(x)/f2(x)
 }
-<environment: 0x4beba28>
+<environment: 0x39d66c8>
 
 > 
 > ## The function is currently defined as
@@ -1286,15 +1261,12 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EuclRandVarList", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("EuclRandVariable-class")
 > ### * EuclRandVariable-class
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EuclRandVariable-class
 > ### Title: Euclidean random variable
 > ### Aliases: EuclRandVariable-class
@@ -1476,7 +1448,7 @@
     }
     log(f1(x))
 }
-<environment: 0x525d420>
+<environment: 0x65d4cb8>
 
 [[2]]
 function (x) 
@@ -1491,7 +1463,7 @@
     }
     log(f1(x))
 }
-<environment: 0x525d420>
+<environment: 0x65d4cb8>
 
 [[3]]
 function (x) 
@@ -1506,7 +1478,7 @@
     }
     log(f1(x))
 }
-<environment: 0x525d420>
+<environment: 0x65d4cb8>
 
 [[4]]
 function (x) 
@@ -1521,7 +1493,7 @@
     }
     log(f1(x))
 }
-<environment: 0x525d420>
+<environment: 0x65d4cb8>
 
 > 
 > # "Arith" group generic
@@ -1535,7 +1507,7 @@
     }
     3 + f2(x)
 }
-<environment: 0x521d3d8>
+<environment: 0x65c5bd0>
 
 [[2]]
 function (x) 
@@ -1546,7 +1518,7 @@
     }
     3 + f2(x)
 }
-<environment: 0x521d3d8>
+<environment: 0x65c5bd0>
 
 [[3]]
 function (x) 
@@ -1557,7 +1529,7 @@
     }
     3 + f2(x)
 }
-<environment: 0x521d3d8>
+<environment: 0x65c5bd0>
 
 [[4]]
 function (x) 
@@ -1568,7 +1540,7 @@
     }
     3 + f2(x)
 }
-<environment: 0x521d3d8>
+<environment: 0x65c5bd0>
 
 > Map(c(1,3,5) * R1)
 Warning in c(1, 3, 5) * R1 :
@@ -1582,7 +1554,7 @@
     }
     1 * f2(x)
 }
-<environment: 0x51b0bb0>
+<environment: 0x6596150>
 
 [[2]]
 function (x) 
@@ -1593,7 +1565,7 @@
     }
     3 * f2(x)
 }
-<environment: 0x51b0bb0>
+<environment: 0x6596150>
 
 [[3]]
 function (x) 
@@ -1604,7 +1576,7 @@
     }
     5 * f2(x)
 }
-<environment: 0x51b0bb0>
+<environment: 0x6596150>
 
 [[4]]
 function (x) 
@@ -1615,7 +1587,7 @@
     }
     1 * f2(x)
 }
-<environment: 0x51b0bb0>
+<environment: 0x6596150>
 
 > try(1:5 * R1) # error
 Error in 1:5 * R1 : 
@@ -1630,7 +1602,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x5329108>
+<environment: 0x64fb500>
 
 [[2]]
 function (x) 
@@ -1641,7 +1613,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x5329108>
+<environment: 0x64fb500>
 
 [[3]]
 function (x) 
@@ -1652,7 +1624,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x5329108>
+<environment: 0x64fb500>
 
 [[4]]
 function (x) 
@@ -1663,7 +1635,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x5329108>
+<environment: 0x64fb500>
 
 > Map(R2 - 5)
 [[1]]
@@ -1675,7 +1647,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x524b000>
+<environment: 0x64b7730>
 
 [[2]]
 function (x) 
@@ -1686,7 +1658,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x524b000>
+<environment: 0x64b7730>
 
 [[3]]
 function (x) 
@@ -1697,7 +1669,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x524b000>
+<environment: 0x64b7730>
 
 [[4]]
 function (x) 
@@ -1708,7 +1680,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x524b000>
+<environment: 0x64b7730>
 
 > Map(R1 ^ R1)
 [[1]]
@@ -1724,7 +1696,7 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x51e6040>
+<environment: 0x645c198>
 
 [[2]]
 function (x) 
@@ -1739,7 +1711,7 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x51e6040>
+<environment: 0x645c198>
 
 [[3]]
 function (x) 
@@ -1754,7 +1726,7 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x51e6040>
+<environment: 0x645c198>
 
 [[4]]
 function (x) 
@@ -1769,21 +1741,18 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x51e6040>
+<environment: 0x645c198>
 
 > 
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EuclRandVariable-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("EuclRandVariable")
 > ### * EuclRandVariable
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EuclRandVariable
 > ### Title: Generating function for EuclRandVariable-class
 > ### Aliases: EuclRandVariable
@@ -1932,7 +1901,7 @@
     }
     log(f1(x))
 }
-<environment: 0x51e2bf8>
+<environment: 0x5f32ab8>
 
 [[2]]
 function (x) 
@@ -1947,7 +1916,7 @@
     }
     log(f1(x))
 }
-<environment: 0x51e2bf8>
+<environment: 0x5f32ab8>
 
 [[3]]
 function (x) 
@@ -1962,7 +1931,7 @@
     }
     log(f1(x))
 }
-<environment: 0x51e2bf8>
+<environment: 0x5f32ab8>
 
 [[4]]
 function (x) 
@@ -1977,7 +1946,7 @@
     }
     log(f1(x))
 }
-<environment: 0x51e2bf8>
+<environment: 0x5f32ab8>
 
 > 
 > # "Arith" group generic
@@ -1991,7 +1960,7 @@
     }
     3 + f2(x)
 }
-<environment: 0x531da50>
+<environment: 0x5f24040>
 
 [[2]]
 function (x) 
@@ -2002,7 +1971,7 @@
     }
     3 + f2(x)
 }
-<environment: 0x531da50>
+<environment: 0x5f24040>
 
 [[3]]
 function (x) 
@@ -2013,7 +1982,7 @@
     }
     3 + f2(x)
 }
-<environment: 0x531da50>
+<environment: 0x5f24040>
 
 [[4]]
 function (x) 
@@ -2024,7 +1993,7 @@
     }
     3 + f2(x)
 }
-<environment: 0x531da50>
+<environment: 0x5f24040>
 
 > Map(c(1,3,5) * R1)
 Warning in c(1, 3, 5) * R1 :
@@ -2038,7 +2007,7 @@
     }
     1 * f2(x)
 }
-<environment: 0x5287c30>
+<environment: 0x5f12668>
 
 [[2]]
 function (x) 
@@ -2049,7 +2018,7 @@
     }
     3 * f2(x)
 }
-<environment: 0x5287c30>
+<environment: 0x5f12668>
 
 [[3]]
 function (x) 
@@ -2060,7 +2029,7 @@
     }
     5 * f2(x)
 }
-<environment: 0x5287c30>
+<environment: 0x5f12668>
 
 [[4]]
 function (x) 
@@ -2071,7 +2040,7 @@
     }
     1 * f2(x)
 }
-<environment: 0x5287c30>
+<environment: 0x5f12668>
 
 > try(1:5 * R1) # error
 Error in 1:5 * R1 : 
@@ -2086,7 +2055,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x51fb350>
+<environment: 0x5eedb38>
 
 [[2]]
 function (x) 
@@ -2097,7 +2066,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x51fb350>
+<environment: 0x5eedb38>
 
 [[3]]
 function (x) 
@@ -2108,7 +2077,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x51fb350>
+<environment: 0x5eedb38>
 
 [[4]]
 function (x) 
@@ -2119,7 +2088,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x51fb350>
+<environment: 0x5eedb38>
 
 > Map(R2 - 5)
 [[1]]
@@ -2131,7 +2100,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x51bdba8>
+<environment: 0x5edd620>
 
 [[2]]
 function (x) 
@@ -2142,7 +2111,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x51bdba8>
+<environment: 0x5edd620>
 
 [[3]]
 function (x) 
@@ -2153,7 +2122,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x51bdba8>
+<environment: 0x5edd620>
 
 [[4]]
 function (x) 
@@ -2164,7 +2133,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x51bdba8>
+<environment: 0x5edd620>
 
 > Map(R1 ^ R1)
 [[1]]
@@ -2180,7 +2149,7 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x531da50>
+<environment: 0x53e5dc0>
 
 [[2]]
 function (x) 
@@ -2195,7 +2164,7 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x531da50>
+<environment: 0x53e5dc0>
 
 [[3]]
 function (x) 
@@ -2210,7 +2179,7 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x531da50>
+<environment: 0x53e5dc0>
 
 [[4]]
 function (x) 
@@ -2225,7 +2194,7 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x531da50>
+<environment: 0x53e5dc0>
 
 > 
 > 
@@ -2251,15 +2220,12 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EuclRandVariable", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("RandVariable-class")
 > ### * RandVariable-class
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: RandVariable-class
 > ### Title: Random variable
 > ### Aliases: RandVariable-class Map Domain Range compatibleDomains
@@ -2283,7 +2249,7 @@
 function (x) 
 {
 }
-<bytecode: 0x462ef98>
+<bytecode: 0x2a9c1a0>
 <environment: namespace:RandVar>
 
 > Domain(R1)
@@ -2330,15 +2296,12 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("RandVariable-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("RandVariable")
 > ### * RandVariable
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: RandVariable
 > ### Title: Generating function for RandVariable-class
 > ### Aliases: RandVariable
@@ -2356,7 +2319,7 @@
 function (x) 
 {
 }
-<environment: 0x51060e8>
+<environment: 0x5d77730>
 
 > Domain(R1)
 NULL
@@ -2412,15 +2375,12 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("RandVariable", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("RealRandVariable-class")
 > ### * RealRandVariable-class
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: RealRandVariable-class
 > ### Title: Real random variable
 > ### Aliases: RealRandVariable-class Range<-,RealRandVariable-method
@@ -2436,15 +2396,12 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("RealRandVariable-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("RealRandVariable")
 > ### * RealRandVariable
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: RealRandVariable
 > ### Title: Generating function for RealRandVariable-class
 > ### Aliases: RealRandVariable
@@ -2481,13 +2438,11 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("RealRandVariable", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > ### * <FOOTER>
 > ###
 > options(digits = 7L)
 > base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
-Time elapsed:  5.964 0.08 6.066 0 0 
+Time elapsed:  2.198 0.028 2.225 0 0 
 > grDevices::dev.off()
 null device 
           1 

Modified: branches/robast-1.0/pkg/RandVar/tests/tests.Rout.save
===================================================================
--- branches/robast-1.0/pkg/RandVar/tests/tests.Rout.save	2015-05-03 08:48:37 UTC (rev 807)
+++ branches/robast-1.0/pkg/RandVar/tests/tests.Rout.save	2015-05-03 08:56:39 UTC (rev 808)
@@ -1,6 +1,6 @@
 
-R version 3.0.3 Patched (2014-03-06 r65149) -- "Warm Puppy"
-Copyright (C) 2014 The R Foundation for Statistical Computing
+R Under development (unstable) (2015-05-02 r68310) -- "Unsuffered Consequences"
+Copyright (C) 2015 The R Foundation for Statistical Computing
 Platform: x86_64-unknown-linux-gnu (64-bit)
 
 R is free software and comes with ABSOLUTELY NO WARRANTY.
@@ -18,16 +18,16 @@
 > library(RandVar)
 Loading required package: distr
 Loading required package: startupmsg
-:startupmsg>  Utilities for start-up messages (version 0.9)
+:startupmsg>  Utilities for Start-Up Messages (version 0.9.1)
 :startupmsg> 
 :startupmsg>  For more information see ?"startupmsg",
 :startupmsg>  NEWS("startupmsg")
 
 Loading required package: sfsmisc
 Loading required package: SweaveListingUtils
-:SweaveListingUtils>  Utilities for Sweave together with
-:SweaveListingUtils>  TeX listings package (version
-:SweaveListingUtils>  0.6.1)
+:SweaveListingUtils>  Utilities for Sweave Together with
+:SweaveListingUtils>  TeX 'listings' Package (version
+:SweaveListingUtils>  0.7)
 :SweaveListingUtils> 
 :SweaveListingUtils>  NOTE: Support for this package
 :SweaveListingUtils>  will stop soon.
@@ -59,8 +59,8 @@
 
     library, require
 
-:distr>  Object oriented implementation of distributions (version
-:distr>  2.5.2)
+:distr>  Object Oriented Implementation of Distributions (version
+:distr>  2.6)
 :distr> 
 :distr>  Attention: Arithmetics on distribution objects are
 :distr>  understood as operations on corresponding random variables
@@ -86,7 +86,7 @@
     df, qqplot, sd
 
 Loading required package: distrEx
-:distrEx>  Extensions of package distr (version 2.5)
+:distrEx>  Extensions of Package 'distr' (version 2.6)
 :distrEx> 
 :distrEx>  Note: Packages "e1071", "moments", "fBasics" should be
 :distrEx>  attached /before/ package "distrEx". See
@@ -109,7 +109,7 @@
 
     IQR, mad, median, var
 
-:RandVar>  Implementation of random variables (version 1.0)
+:RandVar>  Implementation of Random Variables (version 1.0)
 :RandVar> 
 :RandVar>  For more information see ?"RandVar", NEWS("RandVar"), as
 :RandVar>  well as
@@ -139,7 +139,7 @@
 function (x) 
 {
 }
-<environment: 0x5f2b3f8>
+<environment: 0x6fc9ec0>
 
 > Domain(R1)
 NULL
@@ -408,7 +408,7 @@
     }
     t(f(x))
 }
-<environment: 0x6278f78>
+<environment: 0x6764060>
 
 > dimension(R6)
 [1] 6
@@ -497,19 +497,19 @@
 > ## "Math" group
 > system.time(Map(log(abs(R4))), gcFirst = TRUE)
    user  system elapsed 
-  0.000   0.000   0.001 
+  0.001   0.000   0.001 
 > system.time(Map(gamma(R7)), gcFirst = TRUE)
    user  system elapsed 
-  0.004   0.000   0.002 
+  0.001   0.000   0.001 
 > system.time(Map(exp(RL1)[[1]]), gcFirst = TRUE)
    user  system elapsed 
-  0.004   0.000   0.005 
+  0.001   0.000   0.002 
 > 
 > 
 > ## "Arith" group
 > system.time(Map(3 + R3), gcFirst = TRUE)
    user  system elapsed 
-  0.004   0.000   0.001 
+  0.001   0.000   0.001 
 > Map(c(1,3,5) * R3)
 [[1]]
 function (x) 
@@ -520,7 +520,7 @@
     }
     1 * f2(x)
 }
-<environment: 0x62af8d0>
+<environment: 0x7992fc0>
 
 [[2]]
 function (x) 
@@ -531,7 +531,7 @@
     }
     3 * f2(x)
 }
-<environment: 0x62af8d0>
+<environment: 0x7992fc0>
 
 [[3]]
 function (x) 
@@ -542,7 +542,7 @@
     }
     5 * f2(x)
 }
-<environment: 0x62af8d0>
+<environment: 0x7992fc0>
 
 [[4]]
 function (x) 
@@ -553,7 +553,7 @@
     }
     1 * f2(x)
 }
-<environment: 0x62af8d0>
+<environment: 0x7992fc0>
 
 Warning message:
 In c(1, 3, 5) * R3 :
@@ -571,7 +571,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x617c540>
+<environment: 0x790bca0>
 
 [[2]]
 function (x) 
@@ -582,7 +582,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x617c540>
+<environment: 0x790bca0>
 
 [[3]]
 function (x) 
@@ -593,7 +593,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x617c540>
+<environment: 0x790bca0>
 
 [[4]]
 function (x) 
@@ -604,7 +604,7 @@
     }
     1:2 * f2(x)
 }
-<environment: 0x617c540>
+<environment: 0x790bca0>
 
 > Map(2/R6)
 [[1]]
@@ -616,7 +616,7 @@
     }
     2/f2(x)
 }
-<environment: 0x608c648>
+<environment: 0x78608b0>
 
 [[2]]
 function (x) 
@@ -627,7 +627,7 @@
     }
     2/f2(x)
 }
-<environment: 0x608c648>
+<environment: 0x78608b0>
 
 [[3]]
 function (x) 
@@ -638,7 +638,7 @@
     }
     2/f2(x)
 }
-<environment: 0x608c648>
+<environment: 0x78608b0>
 
 [[4]]
 function (x) 
@@ -649,7 +649,7 @@
     }
     2/f2(x)
 }
-<environment: 0x608c648>
+<environment: 0x78608b0>
 
 [[5]]
 function (x) 
@@ -660,7 +660,7 @@
     }
     2/f2(x)
 }
-<environment: 0x608c648>
+<environment: 0x78608b0>
 
 [[6]]
 function (x) 
@@ -671,7 +671,7 @@
     }
     2/f2(x)
 }
-<environment: 0x608c648>
+<environment: 0x78608b0>
 
 > Map(c(1,3,5) %% R6)
 [[1]]
@@ -683,7 +683,7 @@
     }
     1%%f2(x)
 }
-<environment: 0x5f7cbe8>
+<environment: 0x77a3210>
 
 [[2]]
 function (x) 
@@ -694,7 +694,7 @@
     }
     3%%f2(x)
 }
-<environment: 0x5f7cbe8>
+<environment: 0x77a3210>
 
 [[3]]
 function (x) 
@@ -705,7 +705,7 @@
     }
     5%%f2(x)
 }
-<environment: 0x5f7cbe8>
+<environment: 0x77a3210>
 
 [[4]]
 function (x) 
@@ -716,7 +716,7 @@
     }
     1%%f2(x)
 }
-<environment: 0x5f7cbe8>
+<environment: 0x77a3210>
 
 [[5]]
 function (x) 
@@ -727,7 +727,7 @@
     }
     3%%f2(x)
 }
-<environment: 0x5f7cbe8>
+<environment: 0x77a3210>
 
 [[6]]
 function (x) 
@@ -738,7 +738,7 @@
     }
     5%%f2(x)
 }
-<environment: 0x5f7cbe8>
+<environment: 0x77a3210>
 
 > Map(R4 - 5)
 [[1]]
@@ -750,7 +750,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x5cacf90>
+<environment: 0x77589c0>
 
 [[2]]
 function (x) 
@@ -761,7 +761,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x5cacf90>
+<environment: 0x77589c0>
 
 [[3]]
 function (x) 
@@ -772,7 +772,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x5cacf90>
+<environment: 0x77589c0>
 
 [[4]]
 function (x) 
@@ -783,7 +783,7 @@
     }
     f1(x) - c(5, 5)
 }
-<environment: 0x5cacf90>
+<environment: 0x77589c0>
 
 > Map(R6 %/% 2)
 [[1]]
@@ -795,7 +795,7 @@
     }
     f1(x)%/%2
 }
-<environment: 0x5e474d0>
+<environment: 0x76d1888>
 
 [[2]]
 function (x) 
@@ -806,7 +806,7 @@
     }
     f1(x)%/%2
 }
-<environment: 0x5e474d0>
+<environment: 0x76d1888>
 
 [[3]]
 function (x) 
@@ -817,7 +817,7 @@
     }
     f1(x)%/%2
 }
-<environment: 0x5e474d0>
+<environment: 0x76d1888>
 
 [[4]]
 function (x) 
@@ -828,7 +828,7 @@
     }
     f1(x)%/%2
 }
-<environment: 0x5e474d0>
+<environment: 0x76d1888>
 
 [[5]]
 function (x) 
@@ -839,7 +839,7 @@
     }
     f1(x)%/%2
 }
-<environment: 0x5e474d0>
+<environment: 0x76d1888>
 
 [[6]]
 function (x) 
@@ -850,7 +850,7 @@
     }
     f1(x)%/%2
 }
-<environment: 0x5e474d0>
+<environment: 0x76d1888>
 
 > Map(R3 ^ R3)
 [[1]]
@@ -866,7 +866,7 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x5dcf060>
+<environment: 0x768adf8>
 
 [[2]]
 function (x) 
@@ -881,7 +881,7 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x5dcf060>
+<environment: 0x768adf8>
 
 [[3]]
 function (x) 
@@ -896,7 +896,7 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x5dcf060>
+<environment: 0x768adf8>
 
 [[4]]
 function (x) 
@@ -911,7 +911,7 @@
     }
     f1(x)^f2(x)
 }
-<environment: 0x5dcf060>
+<environment: 0x768adf8>
 
 > Map(R7 * R7)
 [[1]]
@@ -927,7 +927,7 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x5c409b0>
+<environment: 0x75a0778>
 
 [[2]]
 function (x) 
@@ -942,7 +942,7 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x5c409b0>
+<environment: 0x75a0778>
 
 [[3]]
 function (x) 
@@ -957,7 +957,7 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x5c409b0>
+<environment: 0x75a0778>
 
 [[4]]
 function (x) 
@@ -972,7 +972,7 @@
     }
     f1(x) * f2(x)
 }
-<environment: 0x5c409b0>
+<environment: 0x75a0778>
 
 > Map((1 + RL1)[[1]])
 [[1]]
@@ -984,7 +984,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x5bb6720>
+<environment: 0x75337f0>
 
 [[2]]
 function (x) 
@@ -995,7 +995,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x5bb6720>
+<environment: 0x75337f0>
 
 [[3]]
 function (x) 
@@ -1006,7 +1006,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x5bb6720>
+<environment: 0x75337f0>
 
 [[4]]
 function (x) 
@@ -1017,7 +1017,7 @@
     }
     1 + f2(x)
 }
-<environment: 0x5bb6720>
+<environment: 0x75337f0>
 
 > Map((RL1 * 2)[[2]])
 [[1]]
@@ -1029,7 +1029,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x56db490>
+<environment: 0x721d438>
 
 [[2]]
 function (x) 
@@ -1040,7 +1040,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x56db490>
+<environment: 0x721d438>
 
 [[3]]
 function (x) 
@@ -1051,7 +1051,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x56db490>
+<environment: 0x721d438>
 
 [[4]]
 function (x) 
@@ -1062,7 +1062,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x56db490>
+<environment: 0x721d438>
 
 [[5]]
 function (x) 
@@ -1073,7 +1073,7 @@
     }
     f1(x) * 2
 }
-<environment: 0x56db490>
+<environment: 0x721d438>
 
 [[6]]
 function (x) 
@@ -1084,11 +1084,11 @@
     }
     f1(x) * 2
 }
-<environment: 0x56db490>
+<environment: 0x721d438>
 
 > system.time(Map((RL1 %% RL1)[[3]]), gcFirst = TRUE)
    user  system elapsed 
-  0.008   0.000   0.007 
+  0.002   0.000   0.002 
 > 
 > 
 > ## "%*%"
@@ -1158,7 +1158,7 @@
     }
     f1(x) + c(13L, 15L) %*% f2(x)
 }
-<environment: 0x5fd5e98>
+<environment: 0x77fa0c8>
 > M1[2,]
 [1]  2  4  6  8 10 12 14 16
 > Map(R8)[[2]]
@@ -1194,7 +1194,7 @@
     }
     f1(x) + c(14L, 16L) %*% f2(x)
 }
-<environment: 0x5fd5e98>
+<environment: 0x77fa0c8>
 > M2 <- matrix(1:2, ncol = 2)
 > (R9 <- M2 %*% R7)
 An object of class "EuclRandMatrix" 
@@ -1244,7 +1244,7 @@
     }
     f1(x) + 2L %*% f2(x)
 }
-<environment: 0x5db41b8>
+<environment: 0x7680cc0>
 
 [[2]]
 function (x) 
[TRUNCATED]

To get the complete diff run:
    svnlook diff /svnroot/robast -r 808

From noreply at r-forge.r-project.org  Sun May  3 11:02:01 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 11:02:01 +0200 (CEST)
Subject: [Robast-commits] r809 - in branches/robast-1.0/pkg/RobAStBase: . man
Message-ID: <20150503090202.021A31878DA@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 11:02:01 +0200 (Sun, 03 May 2015)
New Revision: 809

Modified:
   branches/robast-1.0/pkg/RobAStBase/DESCRIPTION
   branches/robast-1.0/pkg/RobAStBase/man/0RobAStBase-package.Rd
Log:
update of package DESCRIPTION and Rd file

Modified: branches/robast-1.0/pkg/RobAStBase/DESCRIPTION
===================================================================
--- branches/robast-1.0/pkg/RobAStBase/DESCRIPTION	2015-05-03 08:56:39 UTC (rev 808)
+++ branches/robast-1.0/pkg/RobAStBase/DESCRIPTION	2015-05-03 09:02:01 UTC (rev 809)
@@ -1,6 +1,6 @@
 Package: RobAStBase
 Version: 1.0
-Date: 2013-09-12
+Date: 2015-05-03
 Title: Robust Asymptotic Statistics
 Description: Base S4-classes and functions for robust asymptotic statistics.
 Depends: R(>= 2.14.0), methods, rrcov, distr(>= 2.5.2), distrEx(>= 2.5), distrMod(>= 2.5.2),
@@ -15,7 +15,6 @@
 		person("R Core Team", role = c("ctb", "cph"), 
 		comment="for source file 'format.perc'"))
 ByteCompile: yes
-LazyLoad: yes
 License: LGPL-3
 Encoding: latin1
 URL: http://robast.r-forge.r-project.org/

Modified: branches/robast-1.0/pkg/RobAStBase/man/0RobAStBase-package.Rd
===================================================================
--- branches/robast-1.0/pkg/RobAStBase/man/0RobAStBase-package.Rd	2015-05-03 08:56:39 UTC (rev 808)
+++ branches/robast-1.0/pkg/RobAStBase/man/0RobAStBase-package.Rd	2015-05-03 09:02:01 UTC (rev 809)
@@ -12,11 +12,11 @@
 \tabular{ll}{
 Package: \tab RobAStBase \cr
 Version: \tab 1.0 \cr
-Date: \tab 2013-09-12 \cr
-Depends: \tab R(>= 2.14.0), rrcov, distr(>= 2.5.2), distrEx(>= 2.5), distrMod(>= 2.5.2), 
-RandVar(>= 0.9.2)\cr
+Date: \tab 2015-05-03 \cr
+Depends: \tab R(>= 2.14.0), methods, rrcov, distr(>= 2.5.2), distrEx(>= 2.5), distrMod(>= 2.5.2), RandVar(>= 0.9.2)\cr
+Suggests: \tab ROptEst, RUnit (>= 0.4.26)\cr
+Imports: \tab startupmsg\cr
 ByteCompile: \tab yes \cr
-LazyLoad: \tab yes \cr
 License: \tab LGPL-3 \cr
 URL: \tab http://robast.r-forge.r-project.org/\cr
 SVNRevision: \tab 726 \cr


From noreply at r-forge.r-project.org  Sun May  3 11:14:41 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 11:14:41 +0200 (CEST)
Subject: [Robast-commits] r810 - branches/robast-1.0/pkg/RobAStBase/man
Message-ID: <20150503091441.9C1B0183EE6@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 11:14:41 +0200 (Sun, 03 May 2015)
New Revision: 810

Modified:
   branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd
Log:
slightly modified example to reduce check time

Modified: branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd
===================================================================
--- branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd	2015-05-03 09:02:01 UTC (rev 809)
+++ branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd	2015-05-03 09:14:41 UTC (rev 810)
@@ -126,12 +126,15 @@
 }
 
 \examples{
-qqplot(r(Norm(15,sqrt(30)))(40), Chisq(df=15))
+qqplot(rnorm(40, mean = 15, sd = sqrt(30)), Chisq(df=15))
 RobM <- InfRobModel(center = NormLocationFamily(mean=13,sd=sqrt(28)),
                     neighbor = ContNeighborhood(radius = 0.4))
-x <- r(Norm(15,sqrt(30)))(20)
+x <- rnorm(20, mean = 15, sd = sqrt(30))
 qqplot(x, RobM)
+## to reduce check time
+\donttest{
 qqplot(x, RobM, alpha.CI=0.9, add.points.CI=FALSE)
+}
 ## further examples for ANY,kStepEstimator-method
 ## in example to roptest() in package ROptEst
 }


From noreply at r-forge.r-project.org  Sun May  3 11:15:00 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 11:15:00 +0200 (CEST)
Subject: [Robast-commits] r811 -
	branches/robast-1.0/pkg/RobAStBase/tests/Examples
Message-ID: <20150503091500.47582183EE6@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 11:15:00 +0200 (Sun, 03 May 2015)
New Revision: 811

Modified:
   branches/robast-1.0/pkg/RobAStBase/tests/Examples/RobAStBase-Ex.Rout.save
Log:
updated Rout.save file

Modified: branches/robast-1.0/pkg/RobAStBase/tests/Examples/RobAStBase-Ex.Rout.save
===================================================================
--- branches/robast-1.0/pkg/RobAStBase/tests/Examples/RobAStBase-Ex.Rout.save	2015-05-03 09:14:41 UTC (rev 810)
+++ branches/robast-1.0/pkg/RobAStBase/tests/Examples/RobAStBase-Ex.Rout.save	2015-05-03 09:15:00 UTC (rev 811)
@@ -1,1626 +1,1544 @@
-
-R version 3.0.1 Patched (2013-09-02 r63805) -- "Good Sport"
-Copyright (C) 2013 The R Foundation for Statistical Computing
-Platform: i386-w64-mingw32/i386 (32-bit)
-
-R is free software and comes with ABSOLUTELY NO WARRANTY.
-You are welcome to redistribute it under certain conditions.
-Type 'license()' or 'licence()' for distribution details.
-
-  Natural language support but running in an English locale
-
-R is a collaborative project with many contributors.
-Type 'contributors()' for more information and
-'citation()' on how to cite R or R packages in publications.
-
-Type 'demo()' for some demos, 'help()' for on-line help, or
-'help.start()' for an HTML browser interface to help.
-Type 'q()' to quit R.
-
-> pkgname <- "RobAStBase"
-> source(file.path(R.home("share"), "R", "examples-header.R"))
-> options(warn = 1)
-> options(pager = "console")
-> base::assign(".ExTimings", "RobAStBase-Ex.timings", pos = 'CheckExEnv')
-> base::cat("name\tuser\tsystem\telapsed\n", file=base::get(".ExTimings", pos = 'CheckExEnv'))
-> base::assign(".format_ptime",
-+ function(x) {
-+   if(!is.na(x[4L])) x[1L] <- x[1L] + x[4L]
-+   if(!is.na(x[5L])) x[2L] <- x[2L] + x[5L]
-+   options(OutDec = '.')
-+   format(x[1L:3L], digits = 7L)
-+ },
-+ pos = 'CheckExEnv')
-> 
-> ### * </HEADER>
-> library('RobAStBase')
-Loading required package: rrcov
-Loading required package: robustbase
-Loading required package: pcaPP
-Loading required package: mvtnorm
-Scalable Robust Estimators with High Breakdown Point (version 1.3-4)
-
-Loading required package: distr
-Loading required package: startupmsg
-:startupmsg>  Utilities for start-up messages (version 0.8)
-:startupmsg> 
-:startupmsg>  For more information see ?"startupmsg",
-:startupmsg>  NEWS("startupmsg")
-
-Loading required package: sfsmisc
-Loading required package: SweaveListingUtils
-:SweaveListingUtils>  Utilities for Sweave together with
-:SweaveListingUtils>  TeX listings package (version
-:SweaveListingUtils>  0.6.1)
-:SweaveListingUtils> 
-:SweaveListingUtils>  NOTE: Support for this package
-:SweaveListingUtils>  will stop soon.
-:SweaveListingUtils> 
-:SweaveListingUtils>  Package 'knitr' is providing the
-:SweaveListingUtils>  same functionality in a better
-:SweaveListingUtils>  way.
-:SweaveListingUtils> 
-:SweaveListingUtils>  Some functions from package 'base'
-:SweaveListingUtils>  are intentionally masked ---see
-:SweaveListingUtils>  SweaveListingMASK().
-:SweaveListingUtils> 
-:SweaveListingUtils>  Note that global options are
-:SweaveListingUtils>  controlled by
-:SweaveListingUtils>  SweaveListingoptions() ---c.f.
-:SweaveListingUtils>  ?"SweaveListingoptions".
-:SweaveListingUtils> 
-:SweaveListingUtils>  For more information see
-:SweaveListingUtils>  ?"SweaveListingUtils",
-:SweaveListingUtils>  NEWS("SweaveListingUtils")
-:SweaveListingUtils>  There is a vignette to this
-:SweaveListingUtils>  package; try
-:SweaveListingUtils>  vignette("ExampleSweaveListingUtils").
-
-
-Attaching package: 'SweaveListingUtils'
-
-The following objects are masked from 'package:base':
-
-    library, require
-
-:distr>  Object oriented implementation of distributions (version
-:distr>  2.5)
-:distr> 
-:distr>  Attention: Arithmetics on distribution objects are
-:distr>  understood as operations on corresponding random variables
-:distr>  (r.v.s); see distrARITH().
-:distr> 
-:distr>  Some functions from package 'stats' are intentionally masked
-:distr>  ---see distrMASK().
-:distr> 
-:distr>  Note that global options are controlled by distroptions()
-:distr>  ---c.f. ?"distroptions".
-:distr> 
-:distr>  For more information see ?"distr", NEWS("distr"), as well as
-:distr>    http://distr.r-forge.r-project.org/
-:distr>  Package "distrDoc" provides a vignette to this package as
-:distr>  well as to several extension packages; try
-:distr>  vignette("distr").
-
-
-Attaching package: 'distr'
-
-The following objects are masked from 'package:stats':
-
-    df, qqplot, sd
-
-Loading required package: distrEx
-:distrEx>  Extensions of package distr (version 2.4)
-:distrEx> 
-:distrEx>  Note: Packages "e1071", "moments", "fBasics" should be
-:distrEx>  attached /before/ package "distrEx". See
-:distrEx>  distrExMASK().Note: Extreme value distribution
-:distrEx>  functionality has been moved to
-:distrEx> 
-:distrEx>        package "RobExtremes". See distrExMOVED().
-:distrEx> 
-:distrEx>  For more information see ?"distrEx", NEWS("distrEx"), as
-:distrEx>  well as
-:distrEx>    http://distr.r-forge.r-project.org/
-:distrEx>  Package "distrDoc" provides a vignette to this package
-:distrEx>  as well as to several related packages; try
-:distrEx>  vignette("distr").
-
-
-Attaching package: 'distrEx'
-
-The following objects are masked from 'package:stats':
-
-    IQR, mad, median, var
-
-Loading required package: distrMod
-Loading required package: RandVar
-:RandVar>  Implementation of random variables (version 0.9.2)
-:RandVar> 
-:RandVar>  For more information see ?"RandVar", NEWS("RandVar"), as
-:RandVar>  well as
-:RandVar>    http://robast.r-forge.r-project.org/
-:RandVar>  This package also includes a vignette; try
-:RandVar>  vignette("RandVar").
-
-Loading required package: MASS
-Loading required package: stats4
-:distrMod>  Object oriented implementation of probability models
-:distrMod>  (version 2.5)
-:distrMod> 
-:distrMod>  Some functions from pkg's 'base' and 'stats' are
-:distrMod>  intentionally masked ---see distrModMASK().
-:distrMod> 
-:distrMod>  Note that global options are controlled by
-:distrMod>  distrModoptions() ---c.f. ?"distrModoptions".
-:distrMod> 
-:distrMod>  For more information see ?"distrMod",
-:distrMod>  NEWS("distrMod"), as well as
-:distrMod>    http://distr.r-forge.r-project.org/
-:distrMod>  There is a vignette to this package; try
-:distrMod>  vignette("distrMod").
-:distrMod>  Package "distrDoc" provides a vignette to the other
-:distrMod>  distrXXX packages,
-:distrMod>  as well as to several related packages; try
-:distrMod>  vignette("distr").
-
-
-Attaching package: 'distrMod'
-
-The following object is masked from 'package:stats4':
-
-    confint
-
-The following object is masked from 'package:stats':
-
-    confint
-
-The following object is masked from 'package:base':
-
-    norm
-
-:RobAStBase>  Robust Asymptotic Statistics (version 0.9)
-:RobAStBase> 
-:RobAStBase>  Some functions from pkg's 'stats' and 'graphics'
-:RobAStBase>  are intentionally masked ---see RobAStBaseMASK().
-:RobAStBase> 
-:RobAStBase>  Note that global options are controlled by
-:RobAStBase>  RobAStBaseoptions() ---c.f. ?"RobAStBaseoptions".
-:RobAStBase> 
-:RobAStBase>  For more information see ?"RobAStBase",
-:RobAStBase>  NEWS("RobAStBase"), as well as
-:RobAStBase>    http://robast.r-forge.r-project.org/
-
-
-Attaching package: 'RobAStBase'
-
-The following object is masked from 'package:graphics':
-
-    clip
-
-> 
-> base::assign(".oldSearch", base::search(), pos = 'CheckExEnv')
-> cleanEx()
-> nameEx("0RobAStBase-package")
-> ### * 0RobAStBase-package
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: RobAStBase-package
-> ### Title: Robust Asymptotic Statistics
-> ### Aliases: RobAStBase-package RobAStBase
-> ### Keywords: package
-> 
-> ### ** Examples
-> 
-> library(RobAStBase)
-> 
-> ## some L2 differentiable parametric family from package distrMod, e.g.
-> B <- BinomFamily(size = 25, prob = 0.25) 
-> 
-> ## classical optimal IC
-> IC0 <- optIC(model = B, risk = asCov())
-> plot(IC0) # plot IC
-NULL
-> checkIC(IC0, B)
-precision of centering:	 -2.631986e-17 
-precision of Fisher consistency:
-              prob
-prob -1.110223e-16
-precision of Fisher consistency - relativ error [%]:
-              prob
-prob -1.110223e-14
-maximum deviation 
-     1.110223e-16 
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("0RobAStBase-package", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("ALEstimate-class")
-> ### * ALEstimate-class
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: ALEstimate-class
-> ### Title: ALEstimate-class.
-> ### Aliases: ALEstimate-class pIC pIC,ALEstimate-method asbias
-> ###   asbias,ALEstimate-method show,ALEstimate-method
-> ###   confint,ALEstimate,missing-method
-> ###   confint,ALEstimate,symmetricBias-method
-> ###   confint,ALEstimate,onesidedBias-method
-> ###   confint,ALEstimate,asymmetricBias-method
-> ### Keywords: classes
-> 
-> ### ** Examples
-> 
-> ## prototype
-> new("ALEstimate")
-Evaluations of Asymptotically linear estimate:
-----------------------------------------------
-An object of class "Estimate" 
-generated by call
-  `{}`()
-estimate:
-numeric(0)
-asymptotic bias:
-NULL
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("ALEstimate-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("BdStWeight-class")
-> ### * BdStWeight-class
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: BdStWeight-class
-> ### Title: Robust Weight classes for bounded, standardized weights
-> ### Aliases: BdStWeight-class stand,BdStWeight-method
-> ###   stand<-,BdStWeight-method
-> ### Keywords: classes
-> 
-> ### ** Examples
-> 
-> ## prototype
-> new("BdStWeight")
-An object of class "BdStWeight"
-Slot "stand":
-     [,1]
-[1,]    1
-
-Slot "clip":
-[1] 1
-
-Slot "name":
-[1] "some weight"
-
-Slot "weight":
-function (x) 
-1
-<bytecode: 0x07976854>
-<environment: namespace:RobAStBase>
-
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("BdStWeight-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("BoundedWeight-class")
-> ### * BoundedWeight-class
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: BoundedWeight-class
-> ### Title: Robust Weight classes for bounded weights
-> ### Aliases: BoundedWeight-class clip,BoundedWeight-method
-> ###   clip<-,BoundedWeight-method
-> ### Keywords: classes
-> 
-> ### ** Examples
-> 
-> ## prototype
-> new("BoundedWeight")
-An object of class "BoundedWeight"
-Slot "clip":
-[1] 1
-
-Slot "name":
-[1] "some weight"
-
-Slot "weight":
-function (x) 
-1
-<bytecode: 0x0796fce0>
-<environment: namespace:RobAStBase>
-
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("BoundedWeight-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("ComparePlotWrapper")
-> ### * ComparePlotWrapper
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: ComparePlot
-> ### Title: Wrapper function for function comparePlot
-> ### Aliases: ComparePlot
-> 
-> ### ** Examples
-> 
-> # Gamma
-> fam <- GammaFamily()
-> rfam <- InfRobModel(fam, ContNeighborhood(0.5))
-> IC1 <- optIC(model = fam, risk = asCov())
-> IC2 <- makeIC(list(function(x)sin(x),function(x)x^2), L2Fam = fam)
-> Y <- distribution(fam)
-> y <- r(Y)(100)
-> ComparePlot(IC1, IC2, y, withCall = TRUE)
-comparePlot(obj1 = IC1, obj2 = IC2, MBR.fac = 2, MBRB = NA, adj = 0.5, 
-    alpha.trsp = 50, bmar = par("mar")[1], bty = "o", cex = 1.5, 
-    cex.inner = 0.8, cex.lab = 1.5, cex.main = 1.5, cex.pts = 1, 
-    col = "blue", col.MBR = par("col"), col.inner = par("col.main"), 
-    col.lab = "black", col.main = "black", col.pts = c(1, 2, 
-        3, 4), data = y, forceSameModel = FALSE, inner = TRUE, 
-    jitter.fac = 1, legend.bg = "white", legend.cex = 0.8, legend.location = "bottomright", 
-    lty.MBR = "dashed", lwd.MBR = 0.8, main = FALSE, mfColRow = TRUE, 
-    panel.first = grid(), pch.pts = 19, return.Order = FALSE, 
-    scaleN = 9, scaleX = FALSE, scaleY = FALSE, scaleY.fct = function (q, 
-        mean = 0, sd = 1, lower.tail = TRUE, log.p = FALSE) 
-    .External(C_pnorm, q, mean, sd, lower.tail, log.p), scaleY.inv = function (p, 
-        mean = 0, sd = 1, lower.tail = TRUE, log.p = FALSE) 
-    .External(C_qnorm, p, mean, sd, lower.tail, log.p), sub = FALSE, 
-    tmar = par("mar")[3], with.lab = FALSE, with.legend = FALSE, 
-    withMBR = FALSE, withSweave = getdistrOption("withSweave"))
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("ComparePlotWrapper", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("ContIC-class")
-> ### * ContIC-class
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: ContIC-class
-> ### Title: Influence curve of contamination type
-> ### Aliases: ContIC-class CallL2Fam<-,ContIC-method cent cent,ContIC-method
-> ###   cent<- cent<-,ContIC-method clip,ContIC-method clip<-
-> ###   clip<-,ContIC-method lowerCase<- lowerCase<-,ContIC-method stand<-
-> ###   stand<-,ContIC-method neighbor,ContIC-method
-> ###   generateIC,ContNeighborhood,L2ParamFamily-method show,ContIC-method
-> ### Keywords: classes
-> 
-> ### ** Examples
-> 
-> IC1 <- new("ContIC")
-> plot(IC1)
-NULL
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("ContIC-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("ContIC")
-> ### * ContIC
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: ContIC
-> ### Title: Generating function for ContIC-class
-> ### Aliases: ContIC
-> ### Keywords: robust
-> 
-> ### ** Examples
-> 
-> IC1 <- ContIC()
-> plot(IC1)
-NULL
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("ContIC", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("ContNeighborhood-class")
-> ### * ContNeighborhood-class
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: ContNeighborhood-class
-> ### Title: Contamination Neighborhood
-> ### Aliases: ContNeighborhood-class
-> ### Keywords: classes models
-> 
-> ### ** Examples
-> 
-> new("ContNeighborhood")
-An object of class "ContNeighborhood" 
-type:	 (uncond.) convex contamination neighborhood 
-radius:	 0 
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("ContNeighborhood-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("ContNeighborhood")
-> ### * ContNeighborhood
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: ContNeighborhood
-> ### Title: Generating function for ContNeighborhood-class
-> ### Aliases: ContNeighborhood
-> ### Keywords: models
-> 
-> ### ** Examples
-> 
-> ContNeighborhood()
-An object of class "ContNeighborhood" 
-type:	 (uncond.) convex contamination neighborhood 
-radius:	 0 
-> 
-> ## The function is currently defined as
-> function(radius = 0){ 
-+     new("ContNeighborhood", radius = radius) 
-+ }
-function (radius = 0) 
-{
-    new("ContNeighborhood", radius = radius)
-}
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("ContNeighborhood", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("FixRobModel-class")
-> ### * FixRobModel-class
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: FixRobModel-class
-> ### Title: Robust model with fixed (unconditional) neighborhood
-> ### Aliases: FixRobModel-class neighbor<-,FixRobModel-method
-> ###   show,FixRobModel-method
-> ### Keywords: classes models
-> 
-> ### ** Examples
-> 
-> new("FixRobModel")
-An object of class "FixRobModel" 
-###### center:	An object of class "ParamFamily"
-### name:	parametric family of probability measures
-
-### distribution:	Distribution Object of Class: Norm
- mean: 0
- sd: 1
-
-### param:	An object of class "ParamFamParameter"
-name:	parameter of a parametric family of probability measures
-main:	0
-
-###### neighborhood:	An object of class "ContNeighborhood" 
-type:	 (uncond.) convex contamination neighborhood 
-radius:	 0 
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("FixRobModel-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("FixRobModel")
-> ### * FixRobModel
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: FixRobModel
-> ### Title: Generating function for FixRobModel-class
-> ### Aliases: FixRobModel
-> ### Keywords: models
-> 
-> ### ** Examples
-> 
-> (M1 <- FixRobModel())
-An object of class "FixRobModel" 
-###### center:	An object of class "ParamFamily"
-### name:	parametric family of probability measures
-
-### distribution:	Distribution Object of Class: Norm
- mean: 0
- sd: 1
-
-### param:	An object of class "ParamFamParameter"
-name:	location
-main:	0
-
-###### neighborhood:	An object of class "ContNeighborhood" 
-type:	 (uncond.) convex contamination neighborhood 
-radius:	 0 
-> 
-> ## The function is currently defined as
-> function(center = ParamFamily(), neighbor = ContNeighborhood()){
-+     new("FixRobModel", center = center, neighbor = neighbor)
-+ }
-function (center = ParamFamily(), neighbor = ContNeighborhood()) 
-{
-    new("FixRobModel", center = center, neighbor = neighbor)
-}
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("FixRobModel", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("HampIC-class")
-> ### * HampIC-class
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: HampIC-class
-> ### Title: Influence curve of Hampel type
-> ### Aliases: HampIC-class lowerCase lowerCase,HampIC-method neighborRadius
-> ###   neighborRadius,HampIC-method neighborRadius<-
-> ###   neighborRadius<-,HampIC-method stand stand,HampIC-method
-> ###   weight,HampIC-method biastype,HampIC-method normtype,HampIC-method
-> ### Keywords: classes
-> 
-> ### ** Examples
-> 
-> IC1 <- new("HampIC")
-> plot(IC1)
-NULL
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("HampIC-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("HampelWeight-class")
-> ### * HampelWeight-class
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: HampelWeight-class
-> ### Title: Robust Weight classes for weights of Hampel type
-> ### Aliases: HampelWeight-class cent,HampelWeight-method
-> ###   cent<-,HampelWeight-method
-> ### Keywords: classes
-> 
-> ### ** Examples
-> 
-> ## prototype
-> new("HampelWeight")
-An object of class "HampelWeight"
-Slot "cent":
-[1] 0
-
-Slot "stand":
-     [,1]
-[1,]    1
-
-Slot "clip":
-[1] 1
-
-Slot "name":
-[1] "some weight"
-
-Slot "weight":
-function (x) 
-1
-<bytecode: 0x07933778>
-<environment: namespace:RobAStBase>
-
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("HampelWeight-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("IC-class")
-> ### * IC-class
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: IC-class
-> ### Title: Influence curve
-> ### Aliases: IC-class CallL2Fam CallL2Fam,IC-method CallL2Fam<-
-> ###   CallL2Fam<-,IC-method modifyIC modifyIC,IC-method
-> ###   checkIC,IC,missing-method checkIC,IC,L2ParamFamily-method
-> ###   evalIC,IC,numeric-method evalIC,IC,matrix-method show,IC-method
-> ### Keywords: classes robust
-> 
-> ### ** Examples
-> 
-> IC1 <- new("IC")
-> plot(IC1)
-NULL
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("IC-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("IC")
-> ### * IC
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: IC
-> ### Title: Generating function for IC-class
-> ### Aliases: IC
-> ### Keywords: robust
-> 
-> ### ** Examples
-> 
-> IC1 <- IC()
-> plot(IC1)
-NULL
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("IC", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("InfRobModel-class")
-> ### * InfRobModel-class
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: InfRobModel-class
-> ### Title: Robust model with infinitesimal (unconditional) neighborhood
-> ### Aliases: InfRobModel-class neighbor<-,InfRobModel-method
-> ###   show,InfRobModel-method
-> ### Keywords: classes models
-> 
-> ### ** Examples
-> 
-> new("InfRobModel")
-An object of class "InfRobModel" 
-###### center:	An object of class "L2ParamFamily"
-### name:	L_2 differentiable parametric family of probability measures
-
-### distribution:	Distribution Object of Class: Norm
- mean: 0
- sd: 1
-
-### param:	An object of class "ParamFamParameter"
-name:	parameter of a parametric family of probability measures
-main:	0
-
-###### neighborhood:	An object of class "ContNeighborhood" 
-type:	 (uncond.) convex contamination neighborhood 
-radius:	 0 
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("InfRobModel-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("InfRobModel")
-> ### * InfRobModel
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: InfRobModel
-> ### Title: Generating function for InfRobModel-class
-> ### Aliases: InfRobModel
-> ### Keywords: models
-> 
-> ### ** Examples
-> 
-> (M1 <- InfRobModel())
-An object of class "InfRobModel" 
-###### center:	An object of class "L2ParamFamily"
-### name:	L_2 differentiable parametric family of probability measures
-
-### distribution:	Distribution Object of Class: Norm
- mean: 0
- sd: 1
-
-### param:	An object of class "ParamFamParameter"
-name:	location
-main:	0
-
-###### neighborhood:	An object of class "ContNeighborhood" 
-type:	 (uncond.) convex contamination neighborhood 
-radius:	 0 
-> 
-> ## The function is currently defined as
-> function(center = L2ParamFamily(), neighbor = ContNeighborhood()){
-+     new("InfRobModel", center = center, neighbor = neighbor)
-+ }
-function (center = L2ParamFamily(), neighbor = ContNeighborhood()) 
-{
-    new("InfRobModel", center = center, neighbor = neighbor)
-}
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("InfRobModel", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("InfluenceCurve-class")
-> ### * InfluenceCurve-class
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: InfluenceCurve-class
-> ### Title: Influence curve
-> ### Aliases: InfluenceCurve-class addInfo<- addInfo<-,InfluenceCurve-method
-> ###   addRisk<- addRisk<-,InfluenceCurve-method Curve
-> ###   Curve,InfluenceCurve-method Domain,InfluenceCurve-method Infos
-> ###   Infos,InfluenceCurve-method Infos<- Infos<-,InfluenceCurve-method
-> ###   Map,InfluenceCurve-method name,InfluenceCurve-method
-> ###   name<-,InfluenceCurve-method Range,InfluenceCurve-method Risks
-> ###   Risks,InfluenceCurve-method Risks<- Risks<-,InfluenceCurve-method
-> ###   show,InfluenceCurve-method
-> ### Keywords: classes robust
-> 
-> ### ** Examples
-> 
-> new("InfluenceCurve")
-An object of class "InfluenceCurve" 
-### name:	  
-
-### 'Curve':	An object of class "EuclRandVarList" 
-Domain:	NULL
-[[1]]
-length of Map:	 1 
-Range:	Euclidean Space with dimension 1 
-
-### Infos:
-<0 x 0 matrix>
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("InfluenceCurve-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("InfluenceCurve")
-> ### * InfluenceCurve
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: InfluenceCurve
-> ### Title: Generating function for InfluenceCurve-class
-> ### Aliases: InfluenceCurve
-> ### Keywords: robust
-> 
-> ### ** Examples
-> 
-> InfluenceCurve()
-An object of class "InfluenceCurve" 
-### name:	 influence curve 
-
-### 'Curve':	An object of class "EuclRandVarList" 
-Domain:	Real Space with dimension 1 
-[[1]]
-length of Map:	 1 
-Range:	Euclidean Space with dimension 1 
-
-### Infos:
-     method message
-> 
-> ## The function is currently defined as
-> InfluenceCurve <- function(name, Curve = EuclRandVarList(EuclRandVariable(Domain = Reals())), 
-+                            Risks, Infos){
-+     if(missing(name))
-+         name <- "influence curve"
-+     if(missing(Risks))
-+         Risks <- list()
-+     if(missing(Infos))
-+         Infos <- matrix(c(character(0),character(0)), ncol=2,
-+                      dimnames=list(character(0), c("method", "message")))
-+     
-+     return(new("InfluenceCurve", name = name, Curve = Curve, 
-+                Risks = Risks, Infos = Infos))
-+ }
-> 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("InfluenceCurve", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("InfoPlotWrapper")
-> ### * InfoPlotWrapper
-> 
-> flush(stderr()); flush(stdout())
-> 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: InfoPlot
-> ### Title: Wrapper function for information plot method
-> ### Aliases: InfoPlot
-> 
-> ### ** Examples
-> 
-> # Gamma
-> fam  <-  GammaFamily()
-> IC <- optIC(model = fam, risk = asCov())
-> Y <- distribution(fam)
-> data  <-  r(Y)(1000)
-> InfoPlot(IC, data, withCall = FALSE)
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
-Warning in log(x/1) : NaNs produced
[TRUNCATED]

To get the complete diff run:
    svnlook diff /svnroot/robast -r 811

From noreply at r-forge.r-project.org  Sun May  3 11:26:04 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 11:26:04 +0200 (CEST)
Subject: [Robast-commits] r812 - branches/robast-1.0/pkg/RobAStBase/man
Message-ID: <20150503092604.91B9C187270@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 11:26:04 +0200 (Sun, 03 May 2015)
New Revision: 812

Modified:
   branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd
Log:
removed comment which is confusing in the final Rd file

Modified: branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd
===================================================================
--- branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd	2015-05-03 09:15:00 UTC (rev 811)
+++ branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd	2015-05-03 09:26:04 UTC (rev 812)
@@ -131,7 +131,6 @@
                     neighbor = ContNeighborhood(radius = 0.4))
 x <- rnorm(20, mean = 15, sd = sqrt(30))
 qqplot(x, RobM)
-## to reduce check time
 \donttest{
 qqplot(x, RobM, alpha.CI=0.9, add.points.CI=FALSE)
 }


From noreply at r-forge.r-project.org  Sun May  3 11:41:22 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 11:41:22 +0200 (CEST)
Subject: [Robast-commits] r813 - branches/robast-1.0/pkg/RobAStBase/man
Message-ID: <20150503094122.B3BEF186A47@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 11:41:22 +0200 (Sun, 03 May 2015)
New Revision: 813

Modified:
   branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd
Log:
added comment again - as the manual says: "It is good practice to include a comment in the \donttest section explaining why it is needed. "

Modified: branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd
===================================================================
--- branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd	2015-05-03 09:26:04 UTC (rev 812)
+++ branches/robast-1.0/pkg/RobAStBase/man/qqplot.Rd	2015-05-03 09:41:22 UTC (rev 813)
@@ -131,7 +131,8 @@
                     neighbor = ContNeighborhood(radius = 0.4))
 x <- rnorm(20, mean = 15, sd = sqrt(30))
 qqplot(x, RobM)
-\donttest{
+\donttest{ 
+## \donttest to reduce check time
 qqplot(x, RobM, alpha.CI=0.9, add.points.CI=FALSE)
 }
 ## further examples for ANY,kStepEstimator-method


From noreply at r-forge.r-project.org  Sun May  3 12:53:36 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 12:53:36 +0200 (CEST)
Subject: [Robast-commits] r814 - in branches/robast-1.0/pkg/ROptEst: . man
Message-ID: <20150503105336.60A73185146@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 12:53:36 +0200 (Sun, 03 May 2015)
New Revision: 814

Modified:
   branches/robast-1.0/pkg/ROptEst/DESCRIPTION
   branches/robast-1.0/pkg/ROptEst/man/0ROptEst-package.Rd
Log:
update of package DESCRIPTION and Rd file

Modified: branches/robast-1.0/pkg/ROptEst/DESCRIPTION
===================================================================
--- branches/robast-1.0/pkg/ROptEst/DESCRIPTION	2015-05-03 09:41:22 UTC (rev 813)
+++ branches/robast-1.0/pkg/ROptEst/DESCRIPTION	2015-05-03 10:53:36 UTC (rev 814)
@@ -1,6 +1,6 @@
 Package: ROptEst
 Version: 1.0
-Date: 2013-09-12
+Date: 2015-05-03
 Title: Optimally Robust Estimation
 Description: Optimally robust estimation in general smoothly parameterized models using S4
         classes and methods.
@@ -13,7 +13,6 @@
 		person("Gerald", "Kroisandt", role="ctb", comment="contributed testing routines"), 
 		person("Peter", "Ruckdeschel", role=c("aut", "cph")))
 ByteCompile: yes
-LazyLoad: yes
 License: LGPL-3
 URL: http://robast.r-forge.r-project.org/
 Encoding: latin1

Modified: branches/robast-1.0/pkg/ROptEst/man/0ROptEst-package.Rd
===================================================================
--- branches/robast-1.0/pkg/ROptEst/man/0ROptEst-package.Rd	2015-05-03 09:41:22 UTC (rev 813)
+++ branches/robast-1.0/pkg/ROptEst/man/0ROptEst-package.Rd	2015-05-03 10:53:36 UTC (rev 814)
@@ -13,12 +13,12 @@
 \tabular{ll}{
 Package: \tab ROptEst \cr
 Version: \tab 1.0 \cr
-Date: \tab 2013-09-12 \cr
+Date: \tab 2015-05-03 \cr
 Depends: \tab R(>= 2.14.0), methods, distr(>= 2.5.2), distrEx(>= 2.5), distrMod(>= 2.5.2), 
 RandVar(>= 0.9.2), RobAStBase(>= 0.9) \cr
 Suggests: \tab RobLox, MASS \cr
+Imports: \tab startupmsg \cr
 ByteCompile: \tab yes \cr
-LazyLoad: \tab yes \cr
 License: \tab LGPL-3 \cr
 URL: \tab http://robast.r-forge.r-project.org/\cr
 SVNRevision: \tab 728 \cr


From noreply at r-forge.r-project.org  Sun May  3 14:40:53 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 14:40:53 +0200 (CEST)
Subject: [Robast-commits] r815 -
	branches/robast-1.0/pkg/ROptEst/tests/Examples
Message-ID: <20150503124053.373B1187270@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 14:40:52 +0200 (Sun, 03 May 2015)
New Revision: 815

Modified:
   branches/robast-1.0/pkg/ROptEst/tests/Examples/ROptEst-Ex.Rout.save
Log:
updated Rout.save file

Modified: branches/robast-1.0/pkg/ROptEst/tests/Examples/ROptEst-Ex.Rout.save
===================================================================
--- branches/robast-1.0/pkg/ROptEst/tests/Examples/ROptEst-Ex.Rout.save	2015-05-03 10:53:36 UTC (rev 814)
+++ branches/robast-1.0/pkg/ROptEst/tests/Examples/ROptEst-Ex.Rout.save	2015-05-03 12:40:52 UTC (rev 815)
@@ -1,7 +1,6 @@
 
-R version 2.12.1 Patched (2011-01-04 r53913)
-Copyright (C) 2011 The R Foundation for Statistical Computing
-ISBN 3-900051-07-0
+R Under development (unstable) (2015-05-02 r68310) -- "Unsuffered Consequences"
+Copyright (C) 2015 The R Foundation for Statistical Computing
 Platform: x86_64-unknown-linux-gnu (64-bit)
 
 R is free software and comes with ABSOLUTELY NO WARRANTY.
@@ -24,16 +23,24 @@
 > library('ROptEst')
 Loading required package: distr
 Loading required package: startupmsg
-:startupmsg>  Utilities for start-up messages (version 0.7.1)
+:startupmsg>  Utilities for Start-Up Messages (version 0.9.1)
 :startupmsg> 
 :startupmsg>  For more information see ?"startupmsg",
 :startupmsg>  NEWS("startupmsg")
 
 Loading required package: sfsmisc
 Loading required package: SweaveListingUtils
-:SweaveListingUtils>  Utilities for Sweave together with
-:SweaveListingUtils>  TeX listings package (version 0.5)
+:SweaveListingUtils>  Utilities for Sweave Together with
+:SweaveListingUtils>  TeX 'listings' Package (version
+:SweaveListingUtils>  0.7)
 :SweaveListingUtils> 
+:SweaveListingUtils>  NOTE: Support for this package
+:SweaveListingUtils>  will stop soon.
+:SweaveListingUtils> 
+:SweaveListingUtils>  Package 'knitr' is providing the
+:SweaveListingUtils>  same functionality in a better
+:SweaveListingUtils>  way.
+:SweaveListingUtils> 
 :SweaveListingUtils>  Some functions from package 'base'
 :SweaveListingUtils>  are intentionally masked ---see
 :SweaveListingUtils>  SweaveListingMASK().
@@ -51,14 +58,14 @@
 :SweaveListingUtils>  vignette("ExampleSweaveListingUtils").
 
 
-Attaching package: 'SweaveListingUtils'
+Attaching package: ?SweaveListingUtils?
 
-The following object(s) are masked from 'package:base':
+The following objects are masked from ?package:base?:
 
     library, require
 
-:distr>  Object oriented implementation of distributions (version
-:distr>  2.3)
+:distr>  Object Oriented Implementation of Distributions (version
+:distr>  2.6)
 :distr> 
 :distr>  Attention: Arithmetics on distribution objects are
 :distr>  understood as operations on corresponding random variables
@@ -77,27 +84,22 @@
 :distr>  vignette("distr").
 
 
-Attaching package: 'distr'
+Attaching package: ?distr?
 
-The following object(s) are masked from 'package:stats':
+The following objects are masked from ?package:stats?:
 
     df, qqplot, sd
 
 Loading required package: distrEx
-Loading required package: evd
-Loading required package: actuar
-
-Attaching package: 'actuar'
-
-The following object(s) are masked from 'package:grDevices':
-
-    cm
-
-:distrEx>  Extensions of package distr (version 2.3)
+:distrEx>  Extensions of Package 'distr' (version 2.6)
 :distrEx> 
 :distrEx>  Note: Packages "e1071", "moments", "fBasics" should be
-:distrEx>  attached /before/ package "distrEx". See distrExMASK().
+:distrEx>  attached /before/ package "distrEx". See
+:distrEx>  distrExMASK().Note: Extreme value distribution
+:distrEx>  functionality has been moved to
 :distrEx> 
+:distrEx>        package "RobExtremes". See distrExMOVED().
+:distrEx> 
 :distrEx>  For more information see ?"distrEx", NEWS("distrEx"), as
 :distrEx>  well as
 :distrEx>    http://distr.r-forge.r-project.org/
@@ -106,15 +108,15 @@
 :distrEx>  vignette("distr").
 
 
-Attaching package: 'distrEx'
+Attaching package: ?distrEx?
 
-The following object(s) are masked from 'package:stats':
+The following objects are masked from ?package:stats?:
 
     IQR, mad, median, var
 
 Loading required package: distrMod
 Loading required package: RandVar
-:RandVar>  Implementation of random variables (version 0.8)
+:RandVar>  Implementation of Random Variables (version 1.0)
 :RandVar> 
 :RandVar>  For more information see ?"RandVar", NEWS("RandVar"), as
 :RandVar>  well as
@@ -124,8 +126,8 @@
 
 Loading required package: MASS
 Loading required package: stats4
-:distrMod>  Object oriented implementation of probability models
-:distrMod>  (version 2.3)
+:distrMod>  Object Oriented Implementation of Probability Models
+:distrMod>  (version 2.6)
 :distrMod> 
 :distrMod>  Some functions from pkg's 'base' and 'stats' are
 :distrMod>  intentionally masked ---see distrModMASK().
@@ -144,22 +146,26 @@
 :distrMod>  vignette("distr").
 
 
-Attaching package: 'distrMod'
+Attaching package: ?distrMod?
 
-The following object(s) are masked from 'package:stats4':
+The following object is masked from ?package:stats4?:
 
     confint
 
-The following object(s) are masked from 'package:stats':
+The following object is masked from ?package:stats?:
 
     confint
 
-The following object(s) are masked from 'package:base':
+The following object is masked from ?package:base?:
 
     norm
 
 Loading required package: RobAStBase
-:RobAStBase>  Robust Asymptotic Statistics (version 0.8)
+Loading required package: rrcov
+Loading required package: robustbase
+Scalable Robust Estimators with High Breakdown Point (version 1.3-8)
+
+:RobAStBase>  Robust Asymptotic Statistics (version 1.0)
 :RobAStBase> 
 :RobAStBase>  Some functions from pkg's 'stats' and 'graphics'
 :RobAStBase>  are intentionally masked ---see RobAStBaseMASK().
@@ -172,18 +178,14 @@
 :RobAStBase>    http://robast.r-forge.r-project.org/
 
 
-Attaching package: 'RobAStBase'
+Attaching package: ?RobAStBase?
 
-The following object(s) are masked from 'package:stats':
+The following object is masked from ?package:graphics?:
 
-    start
-
-The following object(s) are masked from 'package:graphics':
-
     clip
 
 > 
-> assign(".oldSearch", search(), pos = 'CheckExEnv')
+> base::assign(".oldSearch", base::search(), pos = 'CheckExEnv')
 > cleanEx()
 > nameEx("0ROptEst-package")
 > ### * 0ROptEst-package
@@ -233,44 +235,204 @@
 MLEstimator(x = x, ParamFamily = PoisFamily())
 > 
 > ## compute optimally (w.r.t to MSE) robust estimator (unknown contamination)
-> robest <- roptest(x, PoisFamily(), eps.upper = 0.1, steps = 3)
-> estimate(robest)
+> robEst <- roptest(x, PoisFamily(), eps.upper = 0.1, steps = 3)
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 5.348 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 8.652 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 10.695 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 11.957 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 12.738 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.22 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.518 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.702 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.816 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.886 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.93 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.957 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.973 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.983 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.99 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.994 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.996 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.998 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.999 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.999 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 13.999 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 14 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 14 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 14 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 14 threw an error;
+returning starting par;
+
+Warning in f(arg, ...) :
+  Criterion evaluation at theta = 14 threw an error;
+returning starting par;
+
+Warning in f(val, ...) :
+  Criterion evaluation at theta = 14 threw an error;
+returning starting par;
+
+> estimate(robEst)
   lambda 
-3.908135 
+3.836584 
 > ## check influence curve
-> checkIC(pIC(robest))
-precision of centering:	 -2.707017e-08 
+> pIC(robEst)
+An object of class ?ContIC? 
+### name:	 IC of contamination type 
+
+### L2-differentiable parametric family:	 Poisson family 
+### param:	An object of class "ParamFamParameter"
+name:	positive mean
+lambda:	4.96179128752564
+trafo:
+       lambda
+lambda      1
+
+### neighborhood radius:	 0.5838749 
+
+### clip:	[1] 3.07053
+### cent:	[1] -0.2822973
+### stand:
+         lambda
+lambda 9.043751
+
+### Infos:
+     method  message                          
+[1,] "optIC" "optimally robust IC for ?asMSE?"
+> checkIC(pIC(robEst))
+precision of centering:	 -1.975234e-16 
 precision of Fisher consistency:
               lambda
-lambda -1.980378e-06
+lambda -3.220146e-06
+precision of Fisher consistency - relativ error [%]:
+              lambda
+lambda -0.0003220146
 maximum deviation 
-     1.980378e-06 
+     3.220146e-06 
 > ## plot influence curve
-> plot(pIC(robest))
+> plot(pIC(robEst))
+NULL
 > ## confidence interval based on LAN - neglecting bias
-> confint(robest)
+> confint(robEst)
 A[n] asymptotic (LAN-based) confidence interval:
-          2.5 %   97.5 %
-lambda 3.826169 3.990102
+         2.5 %   97.5 %
+lambda 3.74392 3.929249
 Type of estimator: 3-step estimate
 samplesize:   2608
 Call by which estimate was produced:
-roptest(x = x, L2Fam = PoisFamily(), eps.upper = 0.1, steps = 3)
+robest(x = x, L2Fam = L2Fam, fsCor = fsCor, risk = risk, steps = steps, 
+    verbose = verbose, OptOrIter = OptOrIter, nbCtrl = nbCtrl, 
+    startCtrl = startCtrl, kStepCtrl = kStepCtrl, na.rm = na.rm, 
+    debug = ..withCheck, withTimings = FALSE)
 > ## confidence interval based on LAN - including bias
-> confint(robest, method = symmetricBias())
+> confint(robEst, method = symmetricBias())
 A[n] asymptotic (LAN-based), uniform (bias-aware)
  confidence interval:
 for symmetric Bias
           2.5 %   97.5 %
-lambda 3.761616 4.054655
+lambda 3.659158 4.014011
 Type of estimator: 3-step estimate
 samplesize:   2608
 Call by which estimate was produced:
-roptest(x = x, L2Fam = PoisFamily(), eps.upper = 0.1, steps = 3)
+robest(x = x, L2Fam = L2Fam, fsCor = fsCor, risk = risk, steps = steps, 
+    verbose = verbose, OptOrIter = OptOrIter, nbCtrl = nbCtrl, 
+    startCtrl = startCtrl, kStepCtrl = kStepCtrl, na.rm = na.rm, 
+    debug = ..withCheck, withTimings = FALSE)
 > 
 > 
 > 
 > cleanEx()
+> nameEx("CniperPointPlotWrapper")
+> ### * CniperPointPlotWrapper
+> 
+> flush(stderr()); flush(stdout())
+> 
+> ### Name: CniperPointPlot
+> ### Title: Wrapper function for cniperPointPlot - Computation and Plot of
+> ###   Cniper Contamination and Cniper Points
+> ### Aliases: CniperPointPlot
+> 
+> ### ** Examples
+> 
+> L2fam <- NormLocationScaleFamily()
+> CniperPointPlot(fam=L2fam, main = "Normal location and scale", 
++                 lower = 0, upper = 2.5, withCall = FALSE)
+> 
+> 
+> 
+> cleanEx()
 > nameEx("asAnscombe-class")
 > ### * asAnscombe-class
 > 
@@ -418,14 +580,9 @@
 > flush(stderr()); flush(stdout())
 > 
 > ### Name: cniperCont
-> ### Title: Generic Functions for Computation and Plot of Cniper
-> ###   Contamination and Cniper Points.
-> ### Aliases: cniperCont cniperCont-methods
-> ###   cniperCont,IC,IC,L2ParamFamily,ContNeighborhood,asMSE-method
-> ###   cniperPoint cniperPoint-methods
-> ###   cniperPoint,L2ParamFamily,ContNeighborhood,asMSE-method
-> ###   cniperPointPlot cniperPointPlot-methods
-> ###   cniperPointPlot,L2ParamFamily,ContNeighborhood,asMSE-method
+> ### Title: Functions for Computation and Plot of Cniper Contamination and
+> ###   Cniper Points.
+> ### Aliases: cniperCont cniperPoint cniperPointPlot
 > ### Keywords: robust
 > 
 > ### ** Examples
@@ -436,7 +593,7 @@
 > IC1 <- optIC(model=RobP1, risk=asMSE())
 > RobP2 <- InfRobModel(center = P, neighbor = ContNeighborhood(radius = 1))
 > IC2 <- optIC(model=RobP2, risk=asMSE())
-> cniperCont(IC1 = IC1, IC2 = IC2, L2Fam = P, 
+> cniperCont(IC1 = IC1, IC2 = IC2,
 +            neighbor = ContNeighborhood(radius = 0.5), 
 +            risk = asMSE(),
 +            lower = 0, upper = 8, n = 101)
@@ -445,19 +602,45 @@
 > cniperPointPlot(P, neighbor = ContNeighborhood(radius = 0.5), 
 +                 risk = asMSE(), lower = 0, upper = 10)
 > 
-> ## cniper point
-> cniperPoint(P, neighbor = ContNeighborhood(radius = 0.5), 
-+             risk = asMSE(), lower = 0, upper = 4)
-cniper point 
-   0.7803439 
-> cniperPoint(P, neighbor = ContNeighborhood(radius = 0.5), 
-+             risk = asMSE(), lower = 4, upper = 8)
-cniper point 
-    7.219656 
+> ## Don't run to reduce check time on CRAN
+> ## Not run: 
+> ##D ## cniper point
+> ##D cniperPoint(P, neighbor = ContNeighborhood(radius = 0.5), 
+> ##D             risk = asMSE(), lower = 0, upper = 4)
+> ##D cniperPoint(P, neighbor = ContNeighborhood(radius = 0.5), 
+> ##D             risk = asMSE(), lower = 4, upper = 8)
+> ## End(Not run)
 > 
 > 
 > 
 > cleanEx()
+> nameEx("comparePlot")
+> ### * comparePlot
+> 
+> flush(stderr()); flush(stdout())
+> 
+> ### Name: comparePlot-methods
+> ### Title: Compare - Plots
+> ### Aliases: comparePlot comparePlot-methods comparePlot,IC,IC-method
+> ### Keywords: robust
+> 
+> ### ** Examples
+> 
+> N0 <- NormLocationScaleFamily(mean=0, sd=1)
+> N0.Rob1 <- InfRobModel(center = N0,
++            neighbor = ContNeighborhood(radius = 0.5))
+> 
+> ## Don't run to reduce check time on CRAN
+> ## Not run: 
+> ##D IC1 <- optIC(model = N0, risk = asCov())
+> ##D IC2 <- optIC(model = N0.Rob1, risk = asMSE())
+> ##D 
+> ##D comparePlot(IC1,IC2, withMBR=TRUE)
+> ## End(Not run)
+> 
+> 
+> 
+> cleanEx()
 > nameEx("getL1normL2deriv")
 > ### * getL1normL2deriv
 > 
@@ -550,16 +733,71 @@
 > getMaxIneff(N0.ICR,neighbor)
 [1] 1.180746
 > 
-> N0ls <- NormLocationScaleFamily()
-> ICsc <- makeIC(list(sin,cos),N0ls)
-> getMaxIneff(ICsc,neighbor)
-Warning in A[DA.comp] <- matrix(param[1:lA.comp], ncol = k, nrow = p) :
-  number of items to replace is not a multiple of replacement length
-[1] 2.679436
+> ## Don't run to reduce check time on CRAN
+> ## Not run: 
+> ##D N0ls <- NormLocationScaleFamily()
+> ##D ICsc <- makeIC(list(sin,cos),N0ls)
+> ##D getMaxIneff(ICsc,neighbor)
+> ## End(Not run)
 > 
 > 
 > 
+> cleanEx()
+> nameEx("getRadius")
+> ### * getRadius
 > 
+> flush(stderr()); flush(stdout())
+> 
+> ### Name: getRadius
+> ### Title: Computation of the Optimal Radius for Given Clipping Bound
+> ### Aliases: getRadius
+> ### Keywords: robust
+> 
+> ### ** Examples
+> 
+> N <- NormLocationFamily(mean=0, sd=1)
+> nb <- ContNeighborhood(); ri <- asMSE()
+> radIC <- radiusMinimaxIC(L2Fam=N, neighbor=nb, risk=ri, loRad=0.1, upRad=0.5)
+> getRadius(radIC, L2Fam=N, neighbor=nb, risk=ri)
+[1] 0.2853168
+> 
+> ## taken from script NormalScaleModel.R in folder scripts
+> N0 <- NormScaleFamily(mean=0, sd=1)
+> (N0.IC7 <- radiusMinimaxIC(L2Fam=N0, neighbor=nb, risk=ri, loRad=0, upRad=Inf))
+An object of class ?ContIC? 
+### name:	 IC of contamination type 
+
+### L2-differentiable parametric family:	 normal scale family 
+### param:	An object of class "ParamWithScaleFamParameter"
+name:	scale
+sd:	1
+fixed part of param.:
+	mean:	0
+trafo:
+      scale
+scale     1
+
+### neighborhood radius:	 0.4989352 
+
+### clip:	[1] 1.430955
+### cent:	[1] -0.3562166
+### stand:
+         scale
+scale 1.261789
+
+### Infos:
+     method            message                                         
+[1,] "radiusMinimaxIC" "radius minimax IC for radius interval [0, Inf]"
+[2,] "radiusMinimaxIC" "least favorable radius: 0.499"                 
+[3,] "radiusMinimaxIC" "maximum ?asMSE?-inefficiency: 1.504"           
+> ##
+> getRadius(N0.IC7, risk=asMSE(), neighbor=nb, L2Fam=N0)
+[1] 0.4989352
+> getRadius(N0.IC7, risk=asL4(), neighbor=nb, L2Fam=N0)
+[1] 0.6127451
+> 
+> 
+> 
 > cleanEx()
 > nameEx("getReq")
 > ### * getReq
@@ -568,7 +806,7 @@
 > 
 > ### Name: getReq
 > ### Title: getReq - computation of the radius interval where IC1 is better
-> ###   than IC2
+> ###   than IC2.
 > ### Aliases: getReq
 > ### Keywords: robust
 > 
@@ -605,8 +843,6 @@
  achieved precision:	 0.04096877 
 > ## MSE solution
 > N0.ICM <- optIC(model=N0.Rob1, risk=asMSE())
-> ## RMX solution
-> N0.ICR <- radiusMinimaxIC(L2Fam=N0, neighbor=neighbor,risk=asMSE())
 > 
 > getReq(asMSE(),neighbor,N0.ICA,N0.ICM,n=1)
 Warning in .local(IC, risk, L2Fam, ...) :
@@ -618,88 +854,166 @@
   The maximum deviation from the exact IC properties is 0.0020208733776802
 This is larger than the specified 'tol' => the result may be wrong
 [1] 0.00000000 0.06848038
-> getReq(asL1(),neighbor,N0.ICA,N0.ICM,n=30)
-Warning in .local(IC, risk, L2Fam, ...) :
-  The maximum deviation from the exact IC properties is 0.0020208733776802
-This is larger than the specified 'tol' => the result may be wrong
-[1] 0.00000000 0.06544434
-> getReq(asL4(),neighbor,N0.ICA,N0.ICM,n=30)
-Warning in .local(IC, risk, L2Fam, ...) :
-  The maximum deviation from the exact IC properties is 0.0020208733776802
-This is larger than the specified 'tol' => the result may be wrong
-[1] 0.0000000 0.0754216
-> getReq(asMSE(),neighbor,N0.ICA,N0.ICR,n=30)
-Warning in .local(IC, risk, L2Fam, ...) :
-  The maximum deviation from the exact IC properties is 0.0020208733776802
-This is larger than the specified 'tol' => the result may be wrong
-[1] 0.00000000 0.07544307
-> getReq(asL1(),neighbor,N0.ICA,N0.ICR,n=30)
-Warning in .local(IC, risk, L2Fam, ...) :
-  The maximum deviation from the exact IC properties is 0.0020208733776802
-This is larger than the specified 'tol' => the result may be wrong
-[1] 0.00000000 0.07161849
-> getReq(asL4(),neighbor,N0.ICA,N0.ICR,n=30)
-Warning in .local(IC, risk, L2Fam, ...) :
-  The maximum deviation from the exact IC properties is 0.0020208733776802
-This is larger than the specified 'tol' => the result may be wrong
-[1] 0.00000000 0.08429762
-> getReq(asMSE(),neighbor,N0.ICM,N0.ICR,n=30)
-[1] 0.0000000 0.1016517
 > 
-> ### when to use MAD and when Qn 
-> ##  for Qn, see C. Croux, P. Rousseeuw (1993). Alternatives to the Median 
-> ##      Absolute Deviation, JASA 88(424):1273-1283
-> L2M <- NormScaleFamily()
-> IC.mad <- makeIC(function(x)sign(abs(x)-qnorm(.75)),L2M)
-$Curve
-An object of class ?EuclRandVarList? 
-Domain:	Real Space with dimension 1 
-[[1]]
-length of Map:	 1 
-Range:	Real Space with dimension 1 
+> ## Don't run to reduce check time on CRAN
+> ## Not run: 
+> ##D ## RMX solution
+> ##D N0.ICR <- radiusMinimaxIC(L2Fam=N0, neighbor=neighbor,risk=asMSE())
+> ##D 
+> ##D getReq(asL1(),neighbor,N0.ICA,N0.ICM,n=30)
+> ##D getReq(asL4(),neighbor,N0.ICA,N0.ICM,n=30)
+> ##D getReq(asMSE(),neighbor,N0.ICA,N0.ICR,n=30)
+> ##D getReq(asL1(),neighbor,N0.ICA,N0.ICR,n=30)
+> ##D getReq(asL4(),neighbor,N0.ICA,N0.ICR,n=30)
+> ##D getReq(asMSE(),neighbor,N0.ICM,N0.ICR,n=30)
+> ##D 
+> ##D 
+> ##D ### when to use MAD and when Qn 
+> ##D ##  for Qn, see C. Croux, P. Rousseeuw (1993). Alternatives to the Median 
+> ##D ##      Absolute Deviation, JASA 88(424):1273-1283
+> ##D L2M <- NormScaleFamily()
+> ##D IC.mad <- makeIC(function(x)sign(abs(x)-qnorm(.75)),L2M)
+> ##D d.qn <- (2^.5*qnorm(5/8))^-1
+> ##D IC.qn <- makeIC(function(x) d.qn*(1/4 - pnorm(x+1/d.qn) + pnorm(x-1/d.qn)), L2M)
+> ##D getReq(asMSE(), neighbor, IC.mad, IC.qn)
+> ##D getReq(asMSE(), neighbor, IC.mad, IC.qn, radOrOutl = "Outlier", n = 30)
+> ##D # => MAD is better once r > 0.5144 (i.e. for more than 2 outliers for n = 30)
+> ## End(Not run)
+> 
+> 
+> 
+> cleanEx()
+> nameEx("getRiskFctBV-methods")
+> ### * getRiskFctBV-methods
+> 
+> flush(stderr()); flush(stdout())
+> 
+> ### Name: getRiskFctBV-methods
+> ### Title: Methods for Function getRiskFctBV in Package 'ROptEst'
+> ### Aliases: getRiskFctBV getRiskFctBV-methods getRiskFctBV,asL1,ANY-method
+> ###   getRiskFctBV,asL4,ANY-method
+> ### Keywords: classes
+> 
+> ### ** Examples
+> 
+> myrisk <- asMSE()
+> getRiskFctBV(myrisk)
+function(bias, var)  return(bias^2+var)
+<environment: 0x10873e10>
+> 
+> 
+> 
+> cleanEx()
+> nameEx("getRiskIC")
+> ### * getRiskIC
+> 
+> flush(stderr()); flush(stdout())
+> 
+> ### Name: getRiskIC
+> ### Title: Generic function for the computation of a risk for an IC
+> ### Aliases: getRiskIC getRiskIC-methods
+> ###   getRiskIC,HampIC,asCov,missing,missing-method
+> ###   getRiskIC,HampIC,asCov,missing,L2ParamFamily-method
+> ###   getRiskIC,TotalVarIC,asCov,missing,L2ParamFamily-method
+> ### Keywords: robust
+> 
+> ### ** Examples
+> 
+> B <- BinomFamily(size = 25, prob = 0.25)
+> 
+> ## classical optimal IC
+> IC0 <- optIC(model = B, risk = asCov())
+> getRiskIC(IC0, asCov())
+$asCov
+$asCov$distribution
+[1] "Binom(25, 0.25)"
 
-$CallL2Fam
-L2Fam at fam.call
+$asCov$value
+       [,1]
+[1,] 0.0075
 
-An object of class ?IC? 
-### name:	 square integrable (partial) influence curve 
-### L2-differentiable parametric family:	 normal scale family 
 
-### 'Curve':	An object of class ?EuclRandVarList? 
-Domain:	Real Space with dimension 1 
-[[1]]
-length of Map:	 1 
-Range:	Real Space with dimension 1 
+> 
+> 
+> 
+> cleanEx()
+> nameEx("inputGenerator")
+> ### * inputGenerator
+> 
+> flush(stderr()); flush(stdout())
+> 
+> ### Name: inputGenerators
+> ### Title: Input generating functions for function 'robest'
+> ### Aliases: inputGenerators gennbCtrl genstartCtrl genkStepCtrl
+> ### Keywords: robust
+> 
+> ### ** Examples
+> 
+> genkStepCtrl()
+$useLast
+[1] FALSE
 
-### Infos:
-     method message
-> d.qn <- (2^.5*qnorm(5/8))^-1
-> IC.qn <- makeIC(function(x) d.qn*(1/4 - pnorm(x+1/d.qn) + pnorm(x-1/d.qn)), L2M)
-$Curve
-An object of class ?EuclRandVarList? 
-Domain:	Real Space with dimension 1 
-[[1]]
-length of Map:	 1 
-Range:	Real Space with dimension 1 
+$withUpdateInKer
+[1] FALSE
 
-$CallL2Fam
-L2Fam at fam.call
+$IC.UpdateInKer
+getRobAStBaseOption("IC.UpdateInKer")
 
-An object of class ?IC? 
-### name:	 square integrable (partial) influence curve 
-### L2-differentiable parametric family:	 normal scale family 
+$withICList
+[1] FALSE
 
-### 'Curve':	An object of class ?EuclRandVarList? 
-Domain:	Real Space with dimension 1 
-[[1]]
-length of Map:	 1 
-Range:	Real Space with dimension 1 
+$withPICList
+[1] FALSE
 
-### Infos:
-     method message
-> getReq(asMSE(), neighbor, IC.mad, IC.qn)
-[1] 0.5074459       Inf
-> # => MAD is better once r > 0.5144 (i.e. for more than 2 outliers for n = 30)
+$scalename
+[1] "scale"
+
+$withLogScale
+[1] TRUE
+
+> genstartCtrl()
+$distance
+function(e1, e2, ...) standardGeneric("CvMDist")
+<bytecode: 0x46f5e18>
+<environment: 0x4654568>
+attr(,"generic")
+[1] "CvMDist"
+attr(,"generic")attr(,"package")
+[1] "distrEx"
+attr(,"package")
+[1] "distrEx"
+attr(,"group")
+list()
+attr(,"valueClass")
+character(0)
+attr(,"signature")
+[1] "e1" "e2"
+attr(,"default")
+`\001NULL\001`
+attr(,"skeleton")
+(function (e1, e2, ...) 
+stop("invalid call in method dispatch to 'CvMDist' (no default method)", 
+    domain = NA))(e1, e2, ...)
+attr(,"class")
+[1] "standardGeneric"
+attr(,"class")attr(,"package")
+[1] "methods"
+
+> gennbCtrl()
+$neighbor
+An object of class ?ContNeighborhood? 
+type:	 (uncond.) convex contamination neighborhood 
+radius:	 0 
+
+$eps
+
+
+$eps.lower
+
+
+$eps.upper
+
+
 > 
 > 
 > 
@@ -739,7 +1053,8 @@
 [1] 0.5736396
 
 $`asMSE-inefficiency`
-[1] 1.044142
+      up 
+1.044142 
 
 > 
 > 
@@ -764,7 +1079,7 @@
 > 
 > lowerCaseRadius(BinomFamily(size = 10), ContNeighborhood(), asMSE())
 lower case radius 
-         0.690335 
+        0.6903351 
 > lowerCaseRadius(BinomFamily(size = 10), TotalVarNeighborhood(), asMSE())
 lower case radius 
         0.3451675 
@@ -791,11 +1106,15 @@
 > ## classical optimal IC
 > IC0 <- optIC(model = B, risk = asCov())
 > plot(IC0) # plot IC
+NULL
 > checkIC(IC0, B)
-precision of centering:	 -4.254490e-18 
+precision of centering:	 -7.3919e-18 
 precision of Fisher consistency:
              prob
 prob 2.220446e-16
+precision of Fisher consistency - relativ error [%]:
+             prob
+prob 2.220446e-14
 maximum deviation 
      2.220446e-16 
 > 
@@ -826,6 +1145,30 @@
 > 
 > 
 > cleanEx()
+> nameEx("plot-methods")
+> ### * plot-methods
+> 
+> flush(stderr()); flush(stdout())
+> 
+> ### Name: plot-methods
+> ### Title: Methods for Function plot in Package 'ROptEst'
+> ### Aliases: plot plot-methods plot,IC,missing-method
+> ### Keywords: methods distribution
+> 
+> ### ** Examples
+> 
+> N <- NormLocationScaleFamily(mean=0, sd=1)
+> IC <- optIC(model = N, risk = asCov())
+> ## Don't run to reduce check time on CRAN
+> ## Not run: 
+> ##D plot(IC, main = TRUE, panel.first= grid(),
+> ##D      col = "blue", cex.main = 2, cex.inner = 0.6,
+> ##D      withMBR=TRUE)
+> ## End(Not run)
+> 
+> 
+> 
+> cleanEx()
 > nameEx("radiusMinimaxIC")
 > ### * radiusMinimaxIC
 > 
@@ -843,219 +1186,277 @@
 > radIC <- radiusMinimaxIC(L2Fam=N, neighbor=ContNeighborhood(), 
 +                          risk=asMSE(), loRad=0.1, upRad=0.5)
 > checkIC(radIC)
-precision of centering:	 -8.135927e-16 
+precision of centering:	 0 
 precision of Fisher consistency:
-              mean
-mean -3.502745e-06
+             mean
+mean 2.327138e-06
+precision of Fisher consistency - relativ error [%]:
+             mean
+mean 0.0002327138
 maximum deviation 
-     3.502745e-06 
+     2.327138e-06 
 > 
 > 
 > 
 > cleanEx()
-> nameEx("roptest")
-> ### * roptest
+> nameEx("robest")
+> ### * robest
 > 
 > flush(stderr()); flush(stdout())
 > 
-> ### Name: roptest
+> ### Name: robest
 > ### Title: Optimally robust estimation
-> ### Aliases: roptest
+> ### Aliases: robest
 > ### Keywords: robust
 > 
 > ### ** Examples
 > 
+> ## Don't run to reduce check time on CRAN
+> ## Not run: 
+> ##D #############################
+> ##D ## 1. Binomial data
+> ##D #############################
+> ##D ## generate a sample of contaminated data
+> ##D ind <- rbinom(100, size=1, prob=0.05) 
+> ##D x <- rbinom(100, size=25, prob=(1-ind)*0.25 + ind*0.9)
+> ##D 
+> ##D ## Family
+> ##D BF <- BinomFamily(size = 25)
+> ##D ## ML-estimate
+> ##D MLest <- MLEstimator(x, BF)
+> ##D estimate(MLest)
+> ##D confint(MLest)
+> ##D 
+> ##D ## compute optimally robust estimator (known contamination)
+> ##D nb <- gennbCtrl(eps=0.05)
+> ##D robest1 <- robest(x, BF, nbCtrl = nb, steps = 3)
+> ##D estimate(robest1)
+> ##D 
+> ##D confint(robest1, method = symmetricBias())
+> ##D ## neglecting bias
+> ##D confint(robest1)
+> ##D plot(pIC(robest1))
+> ##D tmp <- qqplot(x, robest1, cex.pch=1.5, exp.cex2.pch = -.25,
+> ##D               exp.fadcol.pch = .55, jit.fac=.9)
+> ##D 
+> ##D ## compute optimally robust estimator (unknown contamination)
+> ##D nb2 <- gennbCtrl(eps.lower = 0, eps.upper = 0.2)
+> ##D robest2 <- robest(x, BF, nbCtrl = nb2, steps = 3)
+> ##D estimate(robest2)
+> ##D confint(robest2, method = symmetricBias())
+> ##D plot(pIC(robest2))
+> ##D 
+> ##D ## total variation neighborhoods (known deviation)
+> ##D nb3 <- gennbCtrl(eps = 0.025, neighbor = TotalVarNeighborhood())
+> ##D robest3 <- robest(x, BF, nbCtrl = nb3, steps = 3)
+> ##D estimate(robest3)
+> ##D confint(robest3, method = symmetricBias())
+> ##D plot(pIC(robest3))
+> ##D 
+> ##D ## total variation neighborhoods (unknown deviation)
+> ##D nb4 <- gennbCtrl(eps.lower = 0, eps.upper = 0.1,
+> ##D                  neighbor = TotalVarNeighborhood())
+> ##D robest3 <- robest(x, BF, nbCtrl = nb4, steps = 3)
+> ##D robest4 <- robest(x, BinomFamily(size = 25), nbCtrl = nb4, steps = 3)
+> ##D estimate(robest4)
+> ##D confint(robest4, method = symmetricBias())
+> ##D plot(pIC(robest4))
+> ##D 
+> ##D 
+> ##D #############################
+> ##D ## 2. Poisson data
+> ##D #############################
+> ##D ## Example: Rutherford-Geiger (1910); cf. Feller~(1968), Section VI.7 (a)
+> ##D x <- c(rep(0, 57), rep(1, 203), rep(2, 383), rep(3, 525), rep(4, 532), 
+> ##D        rep(5, 408), rep(6, 273), rep(7, 139), rep(8, 45), rep(9, 27), 
+> ##D        rep(10, 10), rep(11, 4), rep(12, 0), rep(13, 1), rep(14, 1))
+> ##D 
+> ##D ## Family
+> ##D PF <- PoisFamily()
+> ##D 
+> ##D ## ML-estimate
+> ##D MLest <- MLEstimator(x, PF)
+> ##D estimate(MLest)
+> ##D confint(MLest)
+> ##D 
+> ##D ## compute optimally robust estimator (unknown contamination)
+> ##D nb1 <- gennbCtrl(eps.upper = 0.1)
+> ##D robest <- robest(x, PF, nbCtrl = nb1, steps = 3)
+> ##D estimate(robest)
+> ##D 
+> ##D confint(robest, symmetricBias())
+> ##D plot(pIC(robest))
+> ##D tmp <- qqplot(x, robest, cex.pch=1.5, exp.cex2.pch = -.25,
+> ##D               exp.fadcol.pch = .55, jit.fac=.9)
+> ##D  
+> ##D ## total variation neighborhoods (unknown deviation)
+> ##D nb2 <- gennbCtrl(eps.upper = 0.05, neighbor = TotalVarNeighborhood())
+> ##D robest1 <- robest(x, PF, nbCtrl = nb2, steps = 3)
+> ##D estimate(robest1)
+> ##D confint(robest1, symmetricBias())
+> ##D plot(pIC(robest1))
+> ## End(Not run)
+> 
 > #############################
-> ## 1. Binomial data
+> ## 3. Normal (Gaussian) location and scale
 > #############################
-> ## generate a sample of contaminated data
-> ind <- rbinom(100, size=1, prob=0.05) 
-> x <- rbinom(100, size=25, prob=(1-ind)*0.25 + ind*0.9)
+> ## 24 determinations of copper in wholemeal flour
+> library(MASS)
+> data(chem)
+> plot(chem, main = "copper in wholemeal flour", pch = 20)
 > 
+> ## Family
+> NF <- NormLocationScaleFamily()
 > ## ML-estimate
-> MLest <- MLEstimator(x, BinomFamily(size = 25))
+> MLest <- MLEstimator(chem, NF)
 > estimate(MLest)
-[1] 0.2684
+    mean       sd 
+4.280417 5.185859 
 > confint(MLest)
 A[n] asymptotic (CLT-based) confidence interval:
-         2.5 %    97.5 %
-[1,] 0.2510297 0.2857703
+        2.5 %   97.5 %
+mean 2.205679 6.355154
+sd   3.718798 6.652920
 Type of estimator: Maximum likelihood estimate
-samplesize:   100
+samplesize:   24
 Call by which estimate was produced:
-MLEstimator(x = x, ParamFamily = BinomFamily(size = 25))
-Fixed part of the parameter at which estimate was produced:
-size 
-  25 
+MLEstimator(x = chem, ParamFamily = NF)
 > 
-> ## compute optimally robust estimator (known contamination)
-> robest1 <- roptest(x, BinomFamily(size = 25), eps = 0.05, steps = 3)
-> estimate(robest1)
-     prob 
-0.2564327 
-> confint(robest1, method = symmetricBias())
-A[n] asymptotic (LAN-based), uniform (bias-aware)
- confidence interval:
-for symmetric Bias
-        2.5 %    97.5 %
-prob 0.237641 0.2752245
-Type of estimator: 3-step estimate
-samplesize:   100
-Call by which estimate was produced:
-roptest(x = x, L2Fam = BinomFamily(size = 25), eps = 0.05, steps = 3)
-Fixed part of the parameter at which estimate was produced:
-size 
-  25 
-> ## neglecting bias
-> confint(robest1)
-A[n] asymptotic (LAN-based) confidence interval:
-         2.5 %    97.5 %
-prob 0.2382143 0.2746511
-Type of estimator: 3-step estimate
-samplesize:   100
-Call by which estimate was produced:
-roptest(x = x, L2Fam = BinomFamily(size = 25), eps = 0.05, steps = 3)
-Fixed part of the parameter at which estimate was produced:
-size 
-  25 
-> plot(pIC(robest1))
-> qq1 <- qqplot(x, robest1, cex.pch=1.5, exp.cex2.pch = -.25,
-+               exp.fadcol.pch = .55, jit.fac=.9)
-> str(qq1)
-List of 2
- $ x: num [1:100] 2 2.86 2.95 3.07 3.13 ...
- $ y: num [1:100] 0.856 1.838 1.863 2.854 2.986 ...
+> ## Don't run to reduce check time on CRAN
+> ## Not run: 
+> ##D ## compute optimally robust estimator (known contamination)
+> ##D ## takes some time -> you can use package RobLox for normal 
+> ##D ## location and scale which is optimized for speed
+> ##D nb1 <- gennbCtrl(eps = 0.05)
+> ##D robEst <- robest(chem, NF, nbCtrl = nb1, steps = 3)
+> ##D estimate.call(robEst)
+> ##D attr(robEst,"timings")
+> ##D estimate(robest)
+> ##D 
+> ##D confint(robest, symmetricBias())
+> ##D plot(pIC(robest))
+> ##D ## plot of relative and absolute information; cf. Kohl (2005)
+> ##D infoPlot(pIC(robest))
+> ##D 
+> ##D tmp <- qqplot(chem, robest, cex.pch=1.5, exp.cex2.pch = -.25,
+> ##D               exp.fadcol.pch = .55, withLab = TRUE, which.Order=1:4,
+> ##D               exp.cex2.lbl = .12,exp.fadcol.lbl = .45,
+> ##D               nosym.pCI = TRUE, adj.lbl=c(1.7,.2),
+> ##D               exact.pCI = FALSE, log ="xy")
+> ##D              
+> ##D ## finite-sample correction
+> ##D if(require(RobLox)){
+> ##D     n <- length(chem)
+> ##D     r <- 0.05*sqrt(n)
+> ##D     r.fi <- finiteSampleCorrection(n = n, r = r)
+> ##D     fsCor0 <- r.fi/r
[TRUNCATED]

To get the complete diff run:
    svnlook diff /svnroot/robast -r 815

From noreply at r-forge.r-project.org  Sun May  3 15:27:15 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 15:27:15 +0200 (CEST)
Subject: [Robast-commits] r816 - branches/robast-1.0/pkg/RobLox
Message-ID: <20150503132715.3437818795A@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 15:27:14 +0200 (Sun, 03 May 2015)
New Revision: 816

Modified:
   branches/robast-1.0/pkg/RobLox/NAMESPACE
Log:
some imports were missing

Modified: branches/robast-1.0/pkg/RobLox/NAMESPACE
===================================================================
--- branches/robast-1.0/pkg/RobLox/NAMESPACE	2015-05-03 12:40:52 UTC (rev 815)
+++ branches/robast-1.0/pkg/RobLox/NAMESPACE	2015-05-03 13:27:14 UTC (rev 816)
@@ -1,7 +1,7 @@
 importFrom("Biobase", "rowMedians")
 importFrom("lattice","stripplot")
 importFrom("RColorBrewer","brewer.pal")
-importFrom("distr", "q","Reals")
+importFrom("distr", "p", "q", "r", "Reals")
 importClassesFrom("distr","Reals")
 importFrom("RandVar", "EuclRandVarList", "RealRandVariable")		 
 importClassesFrom("RandVar", "EuclRandVarList", "RealRandVariable")		 
@@ -9,7 +9,7 @@
 importClassesFrom("distrMod", "L2LocationFamily", "NormLocationFamily", "NormLocationScaleFamily")
 importMethodsFrom("distrMod", "distribution", "main", "addInfo<-", "Infos", "Infos<-",
                   "normtype", "biastype","normtype<-","biastype<-", "estimate")
-importFrom("RobAStBase","generateIC","ContNeighborhood")
+importFrom("RobAStBase","generateIC","ContNeighborhood", "IC")
 importClassesFrom("RobAStBase", "HampelWeight", "ALEstimate", "kStepEstimate", "ContNeighborhood")
 importMethodsFrom("RobAStBase", "clip", "cent", "stand", "weight", "clip<-", "cent<-", "stand<-", "weight<-", 
          "getweight", "makeIC", "CallL2Fam", "CallL2Fam<-", "neighborRadius", "modifyIC", "addInfo<-")


From noreply at r-forge.r-project.org  Sun May  3 15:27:38 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 15:27:38 +0200 (CEST)
Subject: [Robast-commits] r817 - branches/robast-1.0/pkg/RobLox
Message-ID: <20150503132739.04ED018795A@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 15:27:38 +0200 (Sun, 03 May 2015)
New Revision: 817

Modified:
   branches/robast-1.0/pkg/RobLox/DESCRIPTION
Log:
update of package DESCRIPTION

Modified: branches/robast-1.0/pkg/RobLox/DESCRIPTION
===================================================================
--- branches/robast-1.0/pkg/RobLox/DESCRIPTION	2015-05-03 13:27:14 UTC (rev 816)
+++ branches/robast-1.0/pkg/RobLox/DESCRIPTION	2015-05-03 13:27:38 UTC (rev 817)
@@ -1,6 +1,6 @@
 Package: RobLox
 Version: 1.0
-Date: 2013-09-12
+Date: 2015-05-03
 Title: Optimally Robust Influence Curves and Estimators for Location and Scale
 Description: Functions for the determination of optimally robust influence curves and
         estimators in case of normal location and/or scale.
@@ -9,7 +9,6 @@
 Suggests: MASS
 Authors at R: c(person("Matthias", "Kohl", role=c("cre", "cph"), email="Matthias.Kohl at stamats.de"), 
 		person("Peter", "Ruckdeschel", role=c("aut", "cph")))
-LazyLoad: yes
 ByteCompile: yes
 License: LGPL-3
 Encoding: latin1


From noreply at r-forge.r-project.org  Sun May  3 15:28:57 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 15:28:57 +0200 (CEST)
Subject: [Robast-commits] r818 - branches/robast-1.0/pkg/RobLox/man
Message-ID: <20150503132857.2E87E18795A@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 15:28:56 +0200 (Sun, 03 May 2015)
New Revision: 818

Modified:
   branches/robast-1.0/pkg/RobLox/man/0RobLox-package.Rd
Log:
update of package Rd file

Modified: branches/robast-1.0/pkg/RobLox/man/0RobLox-package.Rd
===================================================================
--- branches/robast-1.0/pkg/RobLox/man/0RobLox-package.Rd	2015-05-03 13:27:38 UTC (rev 817)
+++ branches/robast-1.0/pkg/RobLox/man/0RobLox-package.Rd	2015-05-03 13:28:56 UTC (rev 818)
@@ -13,11 +13,10 @@
 \tabular{ll}{
 Package: \tab RobLox \cr
 Version: \tab 1.0 \cr
-Date: \tab 2013-09-12 \cr
+Date: \tab 2015-05-03 \cr
 Depends: \tab R(>= 2.14.0), stats, distrMod(>= 2.5.2), RobAStBase(>= 0.9) \cr
 Imports: \tab lattice, RColorBrewer, Biobase, RandVar(>= 0.9.2), distr(>= 2.5.2) \cr
 Suggests: \tab MASS\cr
-LazyLoad: \tab yes \cr
 ByteCompile: \tab yes \cr
 License: \tab LGPL-3 \cr
 URL: \tab http://robast.r-forge.r-project.org/\cr


From noreply at r-forge.r-project.org  Sun May  3 15:29:47 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 15:29:47 +0200 (CEST)
Subject: [Robast-commits] r819 - branches/robast-1.0/pkg/RobLox/R
Message-ID: <20150503132947.4EF9918795A@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 15:29:47 +0200 (Sun, 03 May 2015)
New Revision: 819

Modified:
   branches/robast-1.0/pkg/RobLox/R/showdown.R
Log:
minor modification of code to avoid ambiguities

Modified: branches/robast-1.0/pkg/RobLox/R/showdown.R
===================================================================
--- branches/robast-1.0/pkg/RobLox/R/showdown.R	2015-05-03 13:28:56 UTC (rev 818)
+++ branches/robast-1.0/pkg/RobLox/R/showdown.R	2015-05-03 13:29:47 UTC (rev 819)
@@ -20,21 +20,21 @@
     }
 
     set.seed(seed)
-    r <- rbinom(n*M, prob = eps, size = 1)
+    rad <- rbinom(n*M, prob = eps, size = 1)
     Mid <- rnorm(n*M)
     Mcont <- r(contD)(n*M)
-    Mre <- matrix((1-r)*Mid + r*Mcont, ncol = n)
-    ind <- rowSums(matrix(r, ncol = n)) >= n/2
+    Mre <- matrix((1-rad)*Mid + rad*Mcont, ncol = n)
+    ind <- rowSums(matrix(rad, ncol = n)) >= n/2
     while(any(ind)){
         M1 <- sum(ind)
         cat("Samples to re-simulate:\t", M1, "\n")
-        r <- rbinom(n*M1, prob = eps, size = 1)
+        rad <- rbinom(n*M1, prob = eps, size = 1)
         Mid <- rnorm(n*M1)
         Mcont <- r(contD)(n*M1)
-        Mre[ind,] <- (1-r)*Mid + r*Mcont
-        ind[ind] <- rowSums(matrix(r, ncol = n)) >= n/2
+        Mre[ind,] <- (1-rad)*Mid + rad*Mcont
+        ind[ind] <- rowSums(matrix(rad, ncol = n)) >= n/2
     }
-    rm(Mid, Mcont, r, ind)
+    rm(Mid, Mcont, rad, ind)
 
 
     if(plot2){


From noreply at r-forge.r-project.org  Sun May  3 15:34:28 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 15:34:28 +0200 (CEST)
Subject: [Robast-commits] r820 -
	branches/robast-1.0/pkg/RobLox/tests/Examples
Message-ID: <20150503133428.32D0318795E@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 15:34:27 +0200 (Sun, 03 May 2015)
New Revision: 820

Modified:
   branches/robast-1.0/pkg/RobLox/tests/Examples/RobLox-Ex.Rout.save
Log:
updated Rout.save file

Modified: branches/robast-1.0/pkg/RobLox/tests/Examples/RobLox-Ex.Rout.save
===================================================================
--- branches/robast-1.0/pkg/RobLox/tests/Examples/RobLox-Ex.Rout.save	2015-05-03 13:29:47 UTC (rev 819)
+++ branches/robast-1.0/pkg/RobLox/tests/Examples/RobLox-Ex.Rout.save	2015-05-03 13:34:27 UTC (rev 820)
@@ -1,7 +1,6 @@
 
-R Under development (unstable) (2013-02-06 r61845) -- "Unsuffered Consequences"
-Copyright (C) 2013 The R Foundation for Statistical Computing
-ISBN 3-900051-07-0
+R Under development (unstable) (2015-05-02 r68310) -- "Unsuffered Consequences"
+Copyright (C) 2015 The R Foundation for Statistical Computing
 Platform: x86_64-unknown-linux-gnu (64-bit)
 
 R is free software and comes with ABSOLUTELY NO WARRANTY.
@@ -22,49 +21,19 @@
 > source(file.path(R.home("share"), "R", "examples-header.R"))
 > options(warn = 1)
 > library('RobLox')
-Loading required package: lattice
-Loading required package: RColorBrewer
-Loading required package: Biobase
-Loading required package: BiocGenerics
-Loading required package: parallel
-
-Attaching package: ?BiocGenerics?
-
-The following objects are masked from ?package:parallel?:
-
-    clusterApply, clusterApplyLB, clusterCall, clusterEvalQ,
-    clusterExport, clusterMap, parApply, parCapply, parLapply,
-    parLapplyLB, parRapply, parSapply, parSapplyLB
-
-The following object is masked from ?package:stats?:
-
-    xtabs
-
-The following objects are masked from ?package:base?:
-
-    Filter, Find, Map, Position, Reduce, anyDuplicated, as.data.frame,
-    cbind, colnames, duplicated, eval, get, intersect, lapply, mapply,
-    match, mget, order, paste, pmax, pmax.int, pmin, pmin.int, rank,
-    rbind, rep.int, rownames, sapply, setdiff, sort, table, tapply,
-    union, unique, unlist
-
-Welcome to Bioconductor
-
-    Vignettes contain introductory material; view with
-    'browseVignettes()'. To cite Bioconductor, see
-    'citation("Biobase")', and for packages 'citation("pkgname")'.
-
+Loading required package: distrMod
 Loading required package: distr
 Loading required package: startupmsg
-:startupmsg>  Utilities for start-up messages (version 0.8)
+:startupmsg>  Utilities for Start-Up Messages (version 0.9.1)
 :startupmsg> 
 :startupmsg>  For more information see ?"startupmsg",
 :startupmsg>  NEWS("startupmsg")
 
 Loading required package: sfsmisc
 Loading required package: SweaveListingUtils
-:SweaveListingUtils>  Utilities for Sweave together with
-:SweaveListingUtils>  TeX listings package (version 0.6)
+:SweaveListingUtils>  Utilities for Sweave Together with
+:SweaveListingUtils>  TeX 'listings' Package (version
+:SweaveListingUtils>  0.7)
 :SweaveListingUtils> 
 :SweaveListingUtils>  NOTE: Support for this package
 :SweaveListingUtils>  will stop soon.
@@ -92,12 +61,12 @@
 
 Attaching package: ?SweaveListingUtils?
 
-The following object is masked from ?package:base?:
+The following objects are masked from ?package:base?:
 
     library, require
 
-:distr>  Object oriented implementation of distributions (version
-:distr>  2.4)
+:distr>  Object Oriented Implementation of Distributions (version
+:distr>  2.6)
 :distr> 
 :distr>  Attention: Arithmetics on distribution objects are
 :distr>  understood as operations on corresponding random variables
@@ -118,13 +87,12 @@
 
 Attaching package: ?distr?
 
-The following object is masked from ?package:stats?:
+The following objects are masked from ?package:stats?:
 
     df, qqplot, sd
 
-Loading required package: distrMod
 Loading required package: distrEx
-:distrEx>  Extensions of package distr (version 2.4)
+:distrEx>  Extensions of Package 'distr' (version 2.6)
 :distrEx> 
 :distrEx>  Note: Packages "e1071", "moments", "fBasics" should be
 :distrEx>  attached /before/ package "distrEx". See
@@ -143,12 +111,12 @@
 
 Attaching package: ?distrEx?
 
-The following object is masked from ?package:stats?:
+The following objects are masked from ?package:stats?:
 
     IQR, mad, median, var
 
 Loading required package: RandVar
-:RandVar>  Implementation of random variables (version 0.9)
+:RandVar>  Implementation of Random Variables (version 1.0)
 :RandVar> 
 :RandVar>  For more information see ?"RandVar", NEWS("RandVar"), as
 :RandVar>  well as
@@ -158,8 +126,8 @@
 
 Loading required package: MASS
 Loading required package: stats4
-:distrMod>  Object oriented implementation of probability models
-:distrMod>  (version 2.4)
+:distrMod>  Object Oriented Implementation of Probability Models
+:distrMod>  (version 2.6)
 :distrMod> 
 :distrMod>  Some functions from pkg's 'base' and 'stats' are
 :distrMod>  intentionally masked ---see distrModMASK().
@@ -195,11 +163,9 @@
 Loading required package: RobAStBase
 Loading required package: rrcov
 Loading required package: robustbase
-Loading required package: pcaPP
-Loading required package: mvtnorm
-Scalable Robust Estimators with High Breakdown Point (version 1.3-02)
+Scalable Robust Estimators with High Breakdown Point (version 1.3-8)
 
-:RobAStBase>  Robust Asymptotic Statistics (version 0.9)
+:RobAStBase>  Robust Asymptotic Statistics (version 1.0)
 :RobAStBase> 
 :RobAStBase>  Some functions from pkg's 'stats' and 'graphics'
 :RobAStBase>  are intentionally masked ---see RobAStBaseMASK().
@@ -220,23 +186,12 @@
 
 > 
 > base::assign(".oldSearch", base::search(), pos = 'CheckExEnv')
-> base::assign(".ExTimings", "RobLox-Ex.timings", pos = 'CheckExEnv')
-> base::cat("name\tuser\tsystem\telapsed\n", file=base::get(".ExTimings", pos = 'CheckExEnv'))
-> base::assign(".format_ptime",
-+ function(x) {
-+   if(!is.na(x[4L])) x[1L] <- x[1L] + x[4L]
-+   if(!is.na(x[5L])) x[2L] <- x[2L] + x[5L]
-+   format(x[1L:3L])
-+ },
-+ pos = 'CheckExEnv')
-> 
 > cleanEx()
 > nameEx("0RobLox-package")
 > ### * 0RobLox-package
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: RobLox-package
 > ### Title: Optimally robust influence curves and estimators for location
 > ###   and scale
@@ -369,16 +324,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("0RobLox-package", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("finiteSampleCorrection")
 > ### * finiteSampleCorrection
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: finiteSampleCorrection
 > ### Title: Function to compute finite-sample corrected radii
 > ### Aliases: finiteSampleCorrection
@@ -395,16 +346,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("finiteSampleCorrection", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlOptIC")
 > ### * rlOptIC
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlOptIC
 > ### Title: Computation of the optimally robust IC for AL estimators
 > ### Aliases: rlOptIC
@@ -419,6 +366,9 @@
 precision of Fisher consistency:
               mean
 mean -7.580384e-06
+precision of Fisher consistency - relativ error [%]:
+              mean
+mean -0.0007580384
 maximum deviation 
      7.580384e-06 
 > distrExOptions("ErelativeTolerance" = .Machine$double.eps^0.25) # default
@@ -444,16 +394,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlOptIC", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.AL")
 > ### * rlsOptIC.AL
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.AL
 > ### Title: Computation of the optimally robust IC for AL estimators
 > ### Aliases: rlsOptIC.AL
@@ -462,17 +408,21 @@
 > ### ** Examples
 > 
 > IC1 <- rlsOptIC.AL(r = 0.1, check = TRUE)
-Fisher consistency of eta.loc:	 -1.743783e-10 
-centering of eta.sc:	 -3.904033e-10 
-Fisher consistency of eta.sc:	 2.926179e-09 
+Fisher consistency of eta.loc:	 -1.743714e-10 
+centering of eta.sc:	 -3.903789e-10 
+Fisher consistency of eta.sc:	 2.926104e-09 
 MSE equation:	 1.207368e-14 
 > distrExOptions("ErelativeTolerance" = 1e-12)
 > checkIC(IC1)
-precision of centering:	 0 -6.039278e-07 
+precision of centering:	 0 -6.039298e-07 
 precision of Fisher consistency:
-             mean            sd
-mean -1.10248e-06  0.000000e+00
-sd    0.00000e+00 -1.685676e-05
+              mean            sd
+mean -1.102483e-06  0.000000e+00
+sd    0.000000e+00 -1.685676e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -0.0001102483          NaN
+sd             NaN -0.001685676
 maximum deviation 
      1.685676e-05 
 > distrExOptions("ErelativeTolerance" = .Machine$double.eps^0.25) # default
@@ -542,16 +492,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.AL", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.An1")
 > ### * rlsOptIC.An1
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.An1
 > ### Title: Computation of the optimally robust IC for An1 estimators
 > ### Aliases: rlsOptIC.An1
@@ -566,6 +512,10 @@
              mean           sd
 mean 2.530605e-08 0.000000e+00
 sd   0.000000e+00 3.875467e-06
+precision of Fisher consistency - relativ error [%]:
+             mean           sd
+mean 2.530605e-06          NaN
+sd            NaN 0.0003875467
 maximum deviation 
      3.875467e-06 
 > Risks(IC1)
@@ -590,16 +540,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.An1", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.An2")
 > ### * rlsOptIC.An2
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.An2
 > ### Title: Computation of the optimally robust IC for An2 estimators
 > ### Aliases: rlsOptIC.An2
@@ -614,6 +560,10 @@
               mean            sd
 mean -4.006394e-07  0.000000e+00
 sd    0.000000e+00 -1.496408e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -4.006394e-05          NaN
+sd             NaN -0.001496408
 maximum deviation 
      0.0001066371 
 > Risks(IC1)
@@ -637,16 +587,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.An2", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.AnMad")
 > ### * rlsOptIC.AnMad
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.AnMad
 > ### Title: Computation of the optimally robust IC for AnMad estimators
 > ### Aliases: rlsOptIC.AnMad
@@ -661,6 +607,10 @@
               mean            sd
 mean -4.044557e-07  0.000000e+00
 sd    0.000000e+00 -6.821323e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -4.044557e-05          NaN
+sd             NaN -0.006821323
 maximum deviation 
      6.821323e-05 
 > Risks(IC1)
@@ -684,16 +634,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.AnMad", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.BM")
 > ### * rlsOptIC.BM
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.BM
 > ### Title: Computation of the optimally robust IC for BM estimators
 > ### Aliases: rlsOptIC.BM
@@ -707,9 +653,13 @@
 precision of Fisher consistency:
               mean            sd
 mean -2.355426e-06  0.000000e+00
-sd    0.000000e+00 -1.737383e-05
+sd    0.000000e+00 -1.732518e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -0.0002355426          NaN
+sd             NaN -0.001732518
 maximum deviation 
-     1.737383e-05 
+     1.732518e-05 
 > Risks(IC1)
 $asMSE
 [1] 1.659506
@@ -734,16 +684,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.BM", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.Ha3")
 > ### * rlsOptIC.Ha3
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.Ha3
 > ### Title: Computation of the optimally robust IC for Ha3 estimators
 > ### Aliases: rlsOptIC.Ha3
@@ -753,11 +699,15 @@
 > 
 > IC1 <- rlsOptIC.Ha3(r = 0.1)
 > checkIC(IC1)
-precision of centering:	 0 -2.659214e-07 
+precision of centering:	 0 -3.191376e-07 
 precision of Fisher consistency:
               mean            sd
 mean -8.538336e-07  0.000000e+00
 sd    0.000000e+00 -9.691769e-06
+precision of Fisher consistency - relativ error [%]:
+              mean            sd
+mean -8.538336e-05           NaN
+sd             NaN -0.0009691769
 maximum deviation 
      9.691769e-06 
 > Risks(IC1)
@@ -782,16 +732,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.Ha3", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.Ha4")
 > ### * rlsOptIC.Ha4
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.Ha4
 > ### Title: Computation of the optimally robust IC for Ha4 estimators
 > ### Aliases: rlsOptIC.Ha4
@@ -806,6 +752,10 @@
               mean            sd
 mean -2.265319e-06  0.000000e+00
 sd    0.000000e+00 -1.498731e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -0.0002265319          NaN
+sd             NaN -0.001498731
 maximum deviation 
      0.0001069318 
 > Risks(IC1)
@@ -829,16 +779,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.Ha4", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.HaMad")
 > ### * rlsOptIC.HaMad
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.HaMad
 > ### Title: Computation of the optimally robust IC for HuMad estimators
 > ### Aliases: rlsOptIC.HaMad
@@ -853,6 +799,10 @@
               mean            sd
 mean -2.041724e-06  0.000000e+00
 sd    0.000000e+00 -6.821323e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -0.0002041724          NaN
+sd             NaN -0.006821323
 maximum deviation 
      6.821323e-05 
 > Risks(IC1)
@@ -876,16 +826,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.HaMad", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.Hu1")
 > ### * rlsOptIC.Hu1
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.Hu1
 > ### Title: Computation of the optimally robust IC for Hu1 estimators
 > ### Aliases: rlsOptIC.Hu1
@@ -900,6 +846,10 @@
               mean            sd
 mean -3.746843e-06  0.000000e+00
 sd    0.000000e+00 -1.350353e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -0.0003746843          NaN
+sd             NaN -0.001350353
 maximum deviation 
      1.350353e-05 
 > Risks(IC1)
@@ -923,16 +873,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.Hu1", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.Hu2")
 > ### * rlsOptIC.Hu2
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.Hu2
 > ### Title: Computation of the optimally robust IC for Hu2 estimators
 > ### Aliases: rlsOptIC.Hu2
@@ -947,6 +893,10 @@
               mean            sd
 mean -2.563384e-06  0.000000e+00
 sd    0.000000e+00 -1.321969e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -0.0002563384          NaN
+sd             NaN -0.001321969
 maximum deviation 
      1.321969e-05 
 > Risks(IC1)
@@ -970,16 +920,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.Hu2", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.Hu2a")
 > ### * rlsOptIC.Hu2a
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.Hu2a
 > ### Title: Computation of the optimally robust IC for Hu2a estimators
 > ### Aliases: rlsOptIC.Hu2a
@@ -994,6 +940,10 @@
              mean            sd
 mean -3.15714e-06  0.000000e+00
 sd    0.00000e+00 -1.321476e-05
+precision of Fisher consistency - relativ error [%]:
+             mean           sd
+mean -0.000315714          NaN
+sd            NaN -0.001321476
 maximum deviation 
      1.321476e-05 
 > Risks(IC1)
@@ -1017,16 +967,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.Hu2a", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.Hu3")
 > ### * rlsOptIC.Hu3
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.Hu3
 > ### Title: Computation of the optimally robust IC for Hu3 estimators
 > ### Aliases: rlsOptIC.Hu3
@@ -1041,6 +987,10 @@
               mean            sd
 mean -2.132286e-06  0.000000e+00
 sd    0.000000e+00 -1.574855e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -0.0002132286          NaN
+sd             NaN -0.001574855
 maximum deviation 
      8.525774e-05 
 > Risks(IC1)
@@ -1064,16 +1014,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.Hu3", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.HuMad")
 > ### * rlsOptIC.HuMad
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.HuMad
 > ### Title: Computation of the optimally robust IC for HuMad estimators
 > ### Aliases: rlsOptIC.HuMad
@@ -1088,6 +1034,10 @@
               mean            sd
 mean -1.987572e-06  0.000000e+00
 sd    0.000000e+00 -6.821323e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -0.0001987572          NaN
+sd             NaN -0.006821323
 maximum deviation 
      6.821323e-05 
 > Risks(IC1)
@@ -1111,16 +1061,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.HuMad", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.M")
 > ### * rlsOptIC.M
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.M
 > ### Title: Computation of the optimally robust IC for M estimators
 > ### Aliases: rlsOptIC.M
@@ -1131,14 +1077,18 @@
 > IC1 <- rlsOptIC.M(r = 0.1, check = TRUE)
 constraint a1:	 4.682285e-09 
 constraint a3:	 -1.033529e-08 
-MSE equation:	 -3.383516e-12 
+MSE equation:	 -3.383432e-12 
 > distrExOptions("ErelativeTolerance" = 1e-12)
 > checkIC(IC1, NormLocationScaleFamily())
-precision of centering:	 -1.418367e-20 9.579943e-06 
+precision of centering:	 4.510461e-21 9.579943e-06 
 precision of Fisher consistency:
              mean            sd
-mean 1.646253e-05 -8.358660e-22
-sd   1.313976e-21  2.094876e-05
+mean 1.646253e-05 -5.609939e-21
+sd   5.208550e-21  2.094876e-05
+precision of Fisher consistency - relativ error [%]:
+            mean          sd
+mean 0.001646253        -Inf
+sd           Inf 0.002094876
 maximum deviation 
      2.094876e-05 
 > distrExOptions("ErelativeTolerance" = .Machine$double.eps^0.25)
@@ -1163,16 +1113,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.M", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.MM2")
 > ### * rlsOptIC.MM2
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.MM2
 > ### Title: Computation of the optimally robust IC for MM2 estimators
 > ### Aliases: rlsOptIC.MM2
@@ -1187,6 +1133,10 @@
               mean            sd
 mean -2.225204e-06  0.000000e+00
 sd    0.000000e+00 -1.566028e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -0.0002225204          NaN
+sd             NaN -0.001566028
 maximum deviation 
      1.566028e-05 
 > Risks(IC1)
@@ -1210,16 +1160,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.MM2", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.Tu1")
 > ### * rlsOptIC.Tu1
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.Tu1
 > ### Title: Computation of the optimally robust IC for Tu1 estimators
 > ### Aliases: rlsOptIC.Tu1
@@ -1234,6 +1180,10 @@
               mean           sd
 mean -3.649066e-08 0.000000e+00
 sd    0.000000e+00 2.888236e-06
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -3.649066e-06          NaN
+sd             NaN 0.0002888236
 maximum deviation 
      2.888236e-06 
 > Risks(IC1)
@@ -1257,16 +1207,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.Tu1", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.Tu2")
 > ### * rlsOptIC.Tu2
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.Tu2
 > ### Title: Computation of the optimally robust IC for Tu2 estimators
 > ### Aliases: rlsOptIC.Tu2
@@ -1276,11 +1222,15 @@
 > 
 > IC1 <- rlsOptIC.Tu2(r = 0.1)
 > checkIC(IC1)
-precision of centering:	 0 -3.919236e-07 
+precision of centering:	 0 -1.429842e-07 
 precision of Fisher consistency:
               mean            sd
 mean -5.447399e-07  0.000000e+00
 sd    0.000000e+00 -1.437669e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -5.447399e-05          NaN
+sd             NaN -0.001437669
 maximum deviation 
      1.437669e-05 
 > Risks(IC1)
@@ -1304,16 +1254,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.Tu2", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rlsOptIC.TuMad")
 > ### * rlsOptIC.TuMad
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rlsOptIC.TuMad
 > ### Title: Computation of the optimally robust IC for TuMad estimators
 > ### Aliases: rlsOptIC.TuMad
@@ -1328,6 +1274,10 @@
               mean            sd
 mean -5.410012e-07  0.000000e+00
 sd    0.000000e+00 -6.821323e-05
+precision of Fisher consistency - relativ error [%]:
+              mean           sd
+mean -5.410012e-05          NaN
+sd             NaN -0.006821323
 maximum deviation 
      6.821323e-05 
 > Risks(IC1)
@@ -1351,16 +1301,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rlsOptIC.TuMad", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("roblox")
 > ### * roblox
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: roblox
 > ### Title: Optimally robust estimator for location and/or scale
 > ### Aliases: roblox
@@ -1434,10 +1380,10 @@
 samplesize:   100
 estimate:
        mean          sd 
--0.03980472  0.90817692 
+-0.08687757  0.83485767 
 Criterion:
 Kolmogorov distance 
-          0.0568421 
+              1e+20 
 > 
 > # optimally robust (amount of gross errors known)
 > roblox(x, eps = 0.05, initial.est = estimate(ks.est))
@@ -1449,12 +1395,12 @@
 samplesize:   100
 estimate:
       mean           sd     
-  -0.11586692    0.90365737 
- ( 0.10307092) ( 0.07651628)
+  -0.11229870    0.88801808 
+ ( 0.10128710) ( 0.07519204)
 asymptotic (co)variance (multiplied with samplesize):
          [,1]      [,2]
-[1,] 1.062361 0.0000000
-[2,] 0.000000 0.5854741
+[1,] 1.025908 0.0000000
+[2,] 0.000000 0.5653843
 Infos:
      method  
 [1,] "roblox"
@@ -1462,7 +1408,7 @@
 [1,] "finite-sample corrected optimally robust estimate for contamination 'eps' = 0.05 and 'asMSE'"
 asymptotic bias:
       sd 
-1.035576 
+1.017654 
 steps:
 [1] 1
 > 
@@ -1476,10 +1422,10 @@
 samplesize:   100
 estimate:
        mean          sd 
--0.06995363  0.89265661 
+-0.08687757  0.83485767 
 Criterion:
 CvM distance 
-  0.02436665 
+       1e+20 
 > 
 > # optimally robust (amount of gross errors known)
 > roblox(x, eps = 0.05, initial.est = estimate(CvM.est))
@@ -1491,12 +1437,12 @@
 samplesize:   100
 estimate:
       mean           sd     
-  -0.11421421    0.89779415 
- ( 0.10240216) ( 0.07601982)
+  -0.11229870    0.88801808 
+ ( 0.10128710) ( 0.07519204)
 asymptotic (co)variance (multiplied with samplesize):
-        [,1]      [,2]
-[1,] 1.04862 0.0000000
-[2,] 0.00000 0.5779013
+         [,1]      [,2]
+[1,] 1.025908 0.0000000
+[2,] 0.000000 0.5653843
 Infos:
      method  
 [1,] "roblox"
@@ -1504,22 +1450,18 @@
 [1,] "finite-sample corrected optimally robust estimate for contamination 'eps' = 0.05 and 'asMSE'"
 asymptotic bias:
       sd 
-1.028857 
+1.017654 
 steps:
 [1] 1
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("roblox", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rowRoblox")
 > ### * rowRoblox
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rowRoblox and colRoblox
 > ### Title: Optimally robust estimation for location and/or scale
 > ### Aliases: rowRoblox colRoblox
@@ -1858,16 +1800,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rowRoblox", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("rsOptIC")
 > ### * rsOptIC
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: rsOptIC
 > ### Title: Computation of the optimally robust IC for AL estimators
 > ### Aliases: rsOptIC
@@ -1882,6 +1820,9 @@
 precision of Fisher consistency:
               scale
 scale -1.394372e-05
+precision of Fisher consistency - relativ error [%]:
+             scale
+scale -0.001394372
 maximum deviation 
      1.394372e-05 
 > distrExOptions("ErelativeTolerance" = .Machine$double.eps^0.25) # default
@@ -1907,16 +1848,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("rsOptIC", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("showdown")
 > ### * showdown
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: showdown
 > ### Title: Estimator Showdown by Monte-Carlo Study.
 > ### Aliases: showdown
@@ -1954,13 +1891,11 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("showdown", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > ### * <FOOTER>
 > ###
+> options(digits = 7L)
 > base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
-Time elapsed:  72.904 0.34 73.52 0 0 
+Time elapsed:  19.658 0.08 19.723 0 0 
 > grDevices::dev.off()
 pdf 
   2 


From noreply at r-forge.r-project.org  Sun May  3 15:37:25 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 15:37:25 +0200 (CEST)
Subject: [Robast-commits] r821 - branches/robast-1.0/pkg/ROptEstOld
Message-ID: <20150503133725.BB2DD185146@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 15:37:25 +0200 (Sun, 03 May 2015)
New Revision: 821

Modified:
   branches/robast-1.0/pkg/ROptEstOld/DESCRIPTION
Log:
update of package DESCRIPTION

Modified: branches/robast-1.0/pkg/ROptEstOld/DESCRIPTION
===================================================================
--- branches/robast-1.0/pkg/ROptEstOld/DESCRIPTION	2015-05-03 13:34:27 UTC (rev 820)
+++ branches/robast-1.0/pkg/ROptEstOld/DESCRIPTION	2015-05-03 13:37:25 UTC (rev 821)
@@ -1,12 +1,11 @@
 Package: ROptEstOld
 Version: 1.0
-Date: 2013-09-12
+Date: 2015-05-03
 Title: Optimally Robust Estimation - Old Version
 Description: Optimally robust estimation using S4 classes and methods. Old version still needed
         for current versions of ROptRegTS and RobRex.
 Depends: R(>= 2.14.0), methods, distr(>= 2.5.2), distrEx(>= 2.2), RandVar(>= 0.9.2), evd
 Authors at R: person("Matthias", "Kohl", role=c("cre", "cph"), email="Matthias.Kohl at stamats.de")
-LazyLoad: yes
 ByteCompile: yes
 License: LGPL-3
 URL: http://robast.r-forge.r-project.org/


From noreply at r-forge.r-project.org  Sun May  3 17:44:22 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 17:44:22 +0200 (CEST)
Subject: [Robast-commits] r822 - branches/robast-1.0/pkg/RobLoxBioC/R
Message-ID: <20150503154422.D541C1864FF@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 17:44:22 +0200 (Sun, 03 May 2015)
New Revision: 822

Modified:
   branches/robast-1.0/pkg/RobLoxBioC/R/robloxbiocBeadLevelData.R
Log:
minor but corrected

Modified: branches/robast-1.0/pkg/RobLoxBioC/R/robloxbiocBeadLevelData.R
===================================================================
--- branches/robast-1.0/pkg/RobLoxBioC/R/robloxbiocBeadLevelData.R	2015-05-03 13:37:25 UTC (rev 821)
+++ branches/robast-1.0/pkg/RobLoxBioC/R/robloxbiocBeadLevelData.R	2015-05-03 15:44:22 UTC (rev 822)
@@ -11,7 +11,7 @@
                     cat("Could not determine sample factor from beadLevelData. Summarizing each section separately\n")
                     sList <- arraynms
                     sampleFac <- arraynms
-                    newNames <- sList
+                    newNames <- arraynms
                 }else{
                     sampleFac <- BLData at sectionData$SampleGroup[, 1]
                     sList <- unique(sampleFac)


From noreply at r-forge.r-project.org  Sun May  3 17:47:48 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 17:47:48 +0200 (CEST)
Subject: [Robast-commits] r823 - branches/robast-1.0/pkg/RobLoxBioC
Message-ID: <20150503154748.56E431869CB@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 17:47:48 +0200 (Sun, 03 May 2015)
New Revision: 823

Modified:
   branches/robast-1.0/pkg/RobLoxBioC/DESCRIPTION
   branches/robast-1.0/pkg/RobLoxBioC/NAMESPACE
Log:
updates to DESCRIPTION and NAMESPACE

Modified: branches/robast-1.0/pkg/RobLoxBioC/DESCRIPTION
===================================================================
--- branches/robast-1.0/pkg/RobLoxBioC/DESCRIPTION	2015-05-03 15:44:22 UTC (rev 822)
+++ branches/robast-1.0/pkg/RobLoxBioC/DESCRIPTION	2015-05-03 15:47:48 UTC (rev 823)
@@ -1,13 +1,13 @@
 Package: RobLoxBioC
 Version: 1.0
-Date: 2013-09-12
-Title: Infinitesimally Robust Estimators for Preprocessing -omics Data
+Date: 2015-05-03
+Title: Infinitesimally Robust Estimators for Preprocessing -Omics Data
 Description: Functions for the determination of optimally robust influence curves and
         estimators for preprocessing omics data, in particular gene expression data.
-Depends: R(>= 2.14.0), methods, Biobase, affy, beadarray, distr(>= 2.5.2), RobLox(>= 0.9.2),
-        lattice, RColorBrewer,BiocGenerics,distrMod(>= 2.5.2)
+Depends: R(>= 2.14.0), methods, distr(>= 2.5.2), affy
+Imports: Biobase, BiocGenerics, beadarray, RobLox(>= 0.9.2), distrMod(>= 2.5.2), lattice, RColorBrewer
+Suggests: affydata, hgu95av2cdf, beadarrayExampleData
 Authors at R: person("Matthias", "Kohl", role=c("cre", "cph"), email="Matthias.Kohl at stamats.de")
-LazyLoad: yes
 ByteCompile: yes
 License: LGPL-3
 URL: http://robast.r-forge.r-project.org/

Modified: branches/robast-1.0/pkg/RobLoxBioC/NAMESPACE
===================================================================
--- branches/robast-1.0/pkg/RobLoxBioC/NAMESPACE	2015-05-03 15:44:22 UTC (rev 822)
+++ branches/robast-1.0/pkg/RobLoxBioC/NAMESPACE	2015-05-03 15:47:48 UTC (rev 823)
@@ -7,7 +7,7 @@
 importClassesFrom("Biobase","ExpressionSet","AssayData","AnnotatedDataFrame")
 importMethodsFrom("Biobase", "rowMedians", "featureNames", "sampleNames", 
            "phenoData", "experimentData", "exprs", "exprs<-", "assayData","assayData<-")
-importFrom("affy","bg.correct.mas","getCdfInfo")
+importFrom("affy","bg.correct.mas","getCdfInfo", "tukey.biweight")
 importMethodsFrom("affy","intensity")
 import("beadarray")
 importFrom("RobLox", "rowRoblox", "finiteSampleCorrection")


From noreply at r-forge.r-project.org  Sun May  3 17:53:41 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 17:53:41 +0200 (CEST)
Subject: [Robast-commits] r824 - branches/robast-1.0/pkg/RobLoxBioC/R
Message-ID: <20150503155341.B1B6E1877B8@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 17:53:41 +0200 (Sun, 03 May 2015)
New Revision: 824

Modified:
   branches/robast-1.0/pkg/RobLoxBioC/R/KolmogorovMinDist.R
Log:
now works again with newest version of beadarray

Modified: branches/robast-1.0/pkg/RobLoxBioC/R/KolmogorovMinDist.R
===================================================================
--- branches/robast-1.0/pkg/RobLoxBioC/R/KolmogorovMinDist.R	2015-05-03 15:47:48 UTC (rev 823)
+++ branches/robast-1.0/pkg/RobLoxBioC/R/KolmogorovMinDist.R	2015-05-03 15:53:41 UTC (rev 824)
@@ -88,134 +88,56 @@
         list("dist" = kmd.mat, "n" = ns.mat)
     })
 
-setMethod("KolmogorovMinDist", signature(x = "BeadLevelList",
+setMethod("KolmogorovMinDist", signature(x = "beadLevelData",
                                          D = "AbscontDistribution"),
-    function(x, D, log = FALSE, imagesPerArray = 1, what = "G", probes = NULL, arrays = NULL){
+    function(x, D, log = FALSE, what = "Grn", probes = NULL, arrays = NULL){
         BLData <- x
-        arraynms <- arrayNames(BLData)
+        arraynms <- sectionNames(BLData)
         if(!is.null(arrays) && !is.character(arrays)) arraynms <- arraynms[arrays]
         if(is.character(arrays)) arraynms <- which(arraynms %in% arrays)
         len <- length(arraynms)
-        what <- match.arg(what, c("G", "R", "RG", "M", "A", "beta"))
-        whatelse <- ""
-        if(what == "RG"){
-            if(BLData at arrayInfo$channels == "two"){
-                what <- "G"
-                whatelse <- "R"
-            }else{
-                stop("Need two-channel data to calculate summary R and G values")
-            }
-        }
-        if(imagesPerArray == 1){
-            sel <- getArrayData(BLData, what = "ProbeID", array = arraynms[1]) != 0
-            pr <- getArrayData(BLData, what = "ProbeID", array = arraynms[1])[sel]
-            finten <- getArrayData(BLData, what = what, log = log, array = arraynms[1])[sel]
-            nasinf <- !is.finite(finten) | is.na(finten)
-            finten <- finten[!nasinf]
-        }
-        else if(imagesPerArray == 2){
-            if(length(arraynms)%%2 != 0) 
-                stop("Need an even number of arrays when 'imagesPerArray=2'")
-            arrayord <- order(arraynms)
-            arraynms <- arraynms[arrayord]
-            tmp <- unlist(strsplit(arraynms, "_"))
-            chipnums <- tmp[seq(1, length(tmp), by = 3)]
-            pos <- tmp[seq(2, length(tmp), by = 3)]
-            stripnum <- as.numeric(tmp[seq(3, length(tmp), by = 3)])
-            check <- ((chipnums[seq(1, len, by = 2)] == chipnums[seq(2, len, by = 2)]) 
-                      & (pos[seq(1, len, by = 2)] == pos[seq(2, len, by = 2)]) 
-                      & (stripnum[seq(1, len, by = 2)] == stripnum[seq(2, len, by = 2)] - 1))
-            if(sum(check) != length(check)) stop("Missing arrays")
-            sel1 <- getArrayData(BLData, what = "ProbeID", array = arraynms[1]) != 0
-            sel2 <- getArrayData(BLData, what = "ProbeID", array = arraynms[2]) != 0
-            pr <- append(getArrayData(BLData, what = "ProbeID", array = arraynms[1])[sel1], 
-                        getArrayData(BLData, what = "ProbeID", array = arraynms[2])[sel2])
-            finten <- append(getArrayData(BLData, what = what, log = log, array = arraynms[1])[sel1], 
-                            getArrayData(BLData, what = what, log = log, array = arraynms[2])[sel2])
-            nasinf <- !is.finite(finten) | is.na(finten)
-            finten <- finten[!nasinf]
-        }else{
-            stop("You can only specify 1 or 2 images per array")
-        }
+
+        tmp <- BLData[[1]]
+        what <- match.arg(what, colnames(tmp))
+        if(is.na(what)) 
+          stop("Could not find bead data of type ", what, "\n The available choices are: ", 
+               paste(colnames(tmp)), "\n")
+
+        pr <- getBeadData(BLData, what = "ProbeID", array = 1)
+        finten <- getBeadData(BLData, what = what, array = 1)
+        if(log) finten <- log2(finten)
+        nasinf <- !is.finite(finten) | is.na(finten)
+        finten <- finten[!nasinf]
+
         if(is.null(probes)) probes <- sort(unique(pr))
         probes <- probes[probes > 0 & !is.na(probes)]
         noprobes <- length(probes)
         pr <- pr[!nasinf]
-        if (imagesPerArray == 1) {
-            G.kmd <- matrix(0, nrow = noprobes, ncol = len)
-            G.ns <- matrix(0, nrow = noprobes, ncol = len)
-            colnames(G.kmd) <- colnames(G.ns) <- arraynms
-            if (BLData at arrayInfo$channels == "two" && !is.null(BLData[[arraynms[1]]]$R) && whatelse == "R") 
-                R.kmd <- R.ns <- G.kmd
-            else R.kmd <- R.ns <- NULL
-        }
-        else if (imagesPerArray == 2) {
-            G.kmd <- matrix(0, nrow = noprobes, ncol = (len/2))
-            G.ns <- matrix(0, nrow = noprobes, ncol = (len/2))
-            colnames(G.kmd) <- colnames(G.ns) <- arraynms[seq(1, len, by = 2)]
-            if (BLData at arrayInfo$channels == "two" && !is.null(BLData[[arraynms[1]]]$R) && whatelse == "R") 
-                R.kmd <- R.ns <- G.kmd
-            else R.kmd <- R.ns <- NULL
-        }
-        i <- j <- 1
-        while (j <= len) {
+        G.kmd <- matrix(0, nrow = noprobes, ncol = len)
+        G.ns <- matrix(0, nrow = noprobes, ncol = len)
+        colnames(G.kmd) <- colnames(G.ns) <- arraynms
+
+        i <- 1
+        while (i <= len) {
             probeIDs <- as.integer(pr)
             start <- 0
             G.res <- kmdBeadLevel(x = finten, D = D, probeIDs = probeIDs, probes = probes)
             G.kmd[,i] <- G.res[["dist"]]
             G.ns[,i] <- G.res[["n"]]
-            if (BLData at arrayInfo$channels == "two" && !is.null(BLData[[arraynms[i]]]$R) && whatelse == "R") {
-                if (imagesPerArray == 1) {
-                    finten <- getArrayData(BLData, what = whatelse, log = log, array = arraynms[i])[sel]
-                    nasinf <- !is.finite(finten) | is.na(finten)
-                    finten <- finten[!nasinf]
-                    binten <- rep(0, length(finten))
-                }
-                else if (imagesPerArray == 2) {
-                    finten <- append(getArrayData(BLData, what = whatelse, log = log, array = arraynms[j])[sel1], 
-                                    getArrayData(BLData, what = whatelse, log = log, array = arraynms[j + 1])[sel2])
-                    nasinf <- !is.finite(finten) | is.na(finten)
-                    finten <- finten[!nasinf]
-                    binten <- rep(0, length(finten))
-                }
-                start <- 0
-                R.res[,i] <- kmdBeadLevel(x = finten, D = D, probeIDs = probeIDs, probes = probes)
-                R.kmd[,i] <- R.res[["dist"]]
-                R.ns[,i] <- R.res[["n"]]
-            }
-            j <- j + imagesPerArray
+
             i <- i + 1
             rm(probeIDs)
             gc()
-            if ((imagesPerArray == 1) && (i <= len)) {
-                sel <- getArrayData(BLData, what = "ProbeID", array = arraynms[i]) != 0
-                pr <- getArrayData(BLData, what = "ProbeID", array = arraynms[i])[sel]
-                finten <- getArrayData(BLData, what = what, log = log, array = arraynms[i])[sel]
-                nasinf <- !is.finite(finten) | is.na(finten)
-                pr <- pr[!nasinf]
-                finten <- finten[!nasinf]
-            }
-            else if ((imagesPerArray == 2) && (j < len)) {
-                sel1 <- getArrayData(BLData, what = "ProbeID", array = arraynms[j]) != 0
-                sel2 <- getArrayData(BLData, what = "ProbeID", array = arraynms[j + 1]) != 0
-                pr <- append(getArrayData(BLData, what = "ProbeID", array = arraynms[j])[sel1], 
-                             getArrayData(BLData, what = "ProbeID", array = arraynms[j + 1])[sel2])
-                finten <- append(getArrayData(BLData, what = what, log = log, array = arraynms[j])[sel1], 
-                                 getArrayData(BLData, what = what, log = log, array = arraynms[j + 1])[sel2])
-                nasinf <- !is.finite(finten) | is.na(finten)
-                pr <- pr[!nasinf]
-                finten <- finten[!nasinf]
-            }
+
+            pr <- getBeadData(BLData, what = "ProbeID", array = i)
+            finten <- getBeadData(BLData, what = what, array = i)
+            if(log) finten <- log2(finten)
+            nasinf <- !is.finite(finten) | is.na(finten)
+            pr <- pr[!nasinf]
+            finten <- finten[!nasinf]
         }
-        if (whatelse == "R") {
-            rownames(G.kmd) <- rownames(G.ns) <- rownames(R.kmd) <- rownames(R.ns) <- probes
-            res <- list(G = list("dist" = G.kmd, "n" = G.ns), 
-                        R = list("dist" = R.kmd, "n" = R.ns))
-        }
-        else {
-            rownames(G.kmd) <- rownames(G.ns) <- probes
-            res <- list("dist" = G.kmd, "n" = G.ns)
-        }
+        rownames(G.kmd) <- rownames(G.ns) <- probes
+        res <- list("dist" = G.kmd, "n" = G.ns)
         return(res)
     })
 kmdBeadLevel <- function(x, D, probeIDs, probes){


From noreply at r-forge.r-project.org  Sun May  3 18:02:34 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 18:02:34 +0200 (CEST)
Subject: [Robast-commits] r825 - branches/robast-1.0/pkg/RobLoxBioC
Message-ID: <20150503160234.BEB3918792C@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 18:02:34 +0200 (Sun, 03 May 2015)
New Revision: 825

Modified:
   branches/robast-1.0/pkg/RobLoxBioC/DESCRIPTION
Log:
had to add another package to Suggests field

Modified: branches/robast-1.0/pkg/RobLoxBioC/DESCRIPTION
===================================================================
--- branches/robast-1.0/pkg/RobLoxBioC/DESCRIPTION	2015-05-03 15:53:41 UTC (rev 824)
+++ branches/robast-1.0/pkg/RobLoxBioC/DESCRIPTION	2015-05-03 16:02:34 UTC (rev 825)
@@ -6,7 +6,7 @@
         estimators for preprocessing omics data, in particular gene expression data.
 Depends: R(>= 2.14.0), methods, distr(>= 2.5.2), affy
 Imports: Biobase, BiocGenerics, beadarray, RobLox(>= 0.9.2), distrMod(>= 2.5.2), lattice, RColorBrewer
-Suggests: affydata, hgu95av2cdf, beadarrayExampleData
+Suggests: affydata, hgu95av2cdf, beadarrayExampleData, illuminaHumanv3.db
 Authors at R: person("Matthias", "Kohl", role=c("cre", "cph"), email="Matthias.Kohl at stamats.de")
 ByteCompile: yes
 License: LGPL-3


From noreply at r-forge.r-project.org  Sun May  3 18:03:11 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 18:03:11 +0200 (CEST)
Subject: [Robast-commits] r826 - branches/robast-1.0/pkg/RobLoxBioC/man
Message-ID: <20150503160311.F15E218792C@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 18:03:11 +0200 (Sun, 03 May 2015)
New Revision: 826

Modified:
   branches/robast-1.0/pkg/RobLoxBioC/man/0RobLoxBioC-package.Rd
Log:
update of package Rd file

Modified: branches/robast-1.0/pkg/RobLoxBioC/man/0RobLoxBioC-package.Rd
===================================================================
--- branches/robast-1.0/pkg/RobLoxBioC/man/0RobLoxBioC-package.Rd	2015-05-03 16:02:34 UTC (rev 825)
+++ branches/robast-1.0/pkg/RobLoxBioC/man/0RobLoxBioC-package.Rd	2015-05-03 16:03:11 UTC (rev 826)
@@ -13,10 +13,10 @@
 \tabular{ll}{
 Package: \tab RobLoxBioC \cr
 Version: \tab 1.0 \cr
-Date: \tab 2013-09-12 \cr
-Depends: \tab R(>= 2.14.0), methods, Biobase, affy, beadarray, distr, RobLox,
-lattice, RColorBrewer \cr
-LazyLoad: \tab yes \cr
+Date: \tab 2015-05-03 \cr
+Depends:\tab R(>= 2.14.0), methods, distr(>= 2.5.2), affy \cr
+Imports:\tab Biobase, BiocGenerics, beadarray, RobLox(>= 0.9.2), distrMod(>= 2.5.2), lattice, RColorBrewer \cr
+Suggests:\tab affydata, hgu95av2cdf, beadarrayExampleData, illuminaHumanv3.db \cr
 ByteCompile: \tab yes \cr
 License: \tab LGPL-3 \cr
 URL: \tab http://robast.r-forge.r-project.org/\cr


From noreply at r-forge.r-project.org  Sun May  3 18:03:32 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 18:03:32 +0200 (CEST)
Subject: [Robast-commits] r827 - branches/robast-1.0/pkg/RobLoxBioC/man
Message-ID: <20150503160332.2016618792C@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 18:03:31 +0200 (Sun, 03 May 2015)
New Revision: 827

Modified:
   branches/robast-1.0/pkg/RobLoxBioC/man/KolmogorovMinDist.Rd
   branches/robast-1.0/pkg/RobLoxBioC/man/robloxbioc.Rd
Log:
replaced \dontrun by \donttest

Modified: branches/robast-1.0/pkg/RobLoxBioC/man/KolmogorovMinDist.Rd
===================================================================
--- branches/robast-1.0/pkg/RobLoxBioC/man/KolmogorovMinDist.Rd	2015-05-03 16:03:11 UTC (rev 826)
+++ branches/robast-1.0/pkg/RobLoxBioC/man/KolmogorovMinDist.Rd	2015-05-03 16:03:31 UTC (rev 827)
@@ -3,7 +3,7 @@
 \alias{KolmogorovMinDist-methods}
 \alias{KolmogorovMinDist,matrix,Norm-method}
 \alias{KolmogorovMinDist,AffyBatch,AbscontDistribution-method}
-\alias{KolmogorovMinDist,BeadLevelList,AbscontDistribution-method}
+\alias{KolmogorovMinDist,beadLevelData,AbscontDistribution-method}
 
 \title{Generic Function for Computing Minimum Kolmogorov Distance for Biological Data}
 \description{
@@ -17,7 +17,7 @@
 \S4method{KolmogorovMinDist}{AffyBatch,AbscontDistribution}(x, D, bg.correct = TRUE, pmcorrect = TRUE, 
                   verbose = TRUE)
 
-\S4method{KolmogorovMinDist}{BeadLevelList,AbscontDistribution}(x, D, log = FALSE, imagesPerArray = 1, what = "G", 
+\S4method{KolmogorovMinDist}{beadLevelData,AbscontDistribution}(x, D, log = FALSE, what = "Grn", 
                   probes = NULL, arrays = NULL)
 }
 \arguments{
@@ -32,11 +32,8 @@
     If \code{FALSE} only \code{log2(PM)} is used. }
   \item{verbose}{ logical: if \code{TRUE}, some messages are printed. }
   \item{log}{ if \code{TRUE}, then the log2 intensities for each bead-type are summarized. }
-  \item{imagesPerArray}{ Specifies how many images (strips) there are per array. 
-    Normally 1 for a SAM and 1 or 2 for a BeadChip. The images (strips) from the same array 
-    will be combined so that each column in the output represents a sample. }
-  \item{what}{ character string specifying which intensities/values to summarize. 
-    See \code{\link[beadarray]{getArrayData}} for a list of possibilities. }
+  \item{what}{ character string specifying which intensities/values to summarize; 
+    see \code{\link[beadarray]{getBeadData}}. }
   \item{probes}{ Specify particular probes to summarize. If left \code{NULL} then all
     the probes on the first array are used. }
   \item{arrays}{ integer (scalar or vector) specifying the strips/arrays to summarize. 
@@ -68,15 +65,16 @@
 X <- matrix(rnorm(200, mean=ind*3, sd=(1-ind) + ind*9), nrow = 2)
 KolmogorovMinDist(X, D = Norm())
 
-## using Affymetrix-Data
+## using Affymetrix data
 data(SpikeIn)
 probes <- log2(pm(SpikeIn))
 (res <- KolmogorovMinDist(probes, Norm()))
 boxplot(res$dist)
 
-\dontrun{
-## "Not run" just because of computation time
-require(affydata)
+\donttest{
+## \donttest because of check time
+## using Affymetrix data
+library(affydata)
 data(Dilution)
 res <- KolmogorovMinDist(Dilution[,1], Norm())
 summary(res$dist)
@@ -87,14 +85,12 @@
 uni.n <- min(res$n):max(res$n)
 lines(uni.n, 1/(2*uni.n), col = "orange", lwd = 2)
 legend("topright", legend = "minimal possible distance", fill = "orange")
-}
 
-## using Illumina-Data
-\dontrun{
-## "Not run" just because of computation time
-data(BLData)
-res <- KolmogorovMinDist(BLData, Norm(), arrays = 1)
-res1 <- KolmogorovMinDist(BLData, log = TRUE, Norm(), arrays = 1)
+## Illumina bead level data
+library(beadarrayExampleData)
+data(exampleBLData)
+res <- KolmogorovMinDist(exampleBLData, Norm(), arrays = 1)
+res1 <- KolmogorovMinDist(exampleBLData, Norm(), log = TRUE, arrays = 1)
 summary(cbind(res$dist, res1$dist))
 boxplot(list(res$dist, res1$dist), names = c("raw", "log-raw"))
 sort(unique(res1$n))

Modified: branches/robast-1.0/pkg/RobLoxBioC/man/robloxbioc.Rd
===================================================================
--- branches/robast-1.0/pkg/RobLoxBioC/man/robloxbioc.Rd	2015-05-03 16:03:11 UTC (rev 826)
+++ branches/robast-1.0/pkg/RobLoxBioC/man/robloxbioc.Rd	2015-05-03 16:03:31 UTC (rev 827)
@@ -147,13 +147,13 @@
 robloxbioc(X, eps = 0.05)
 robloxbioc(X, eps = 0.05, steps = 5)
 
-## Don't run to reduce check time on CRAN
-\dontrun{
+\donttest{
+## \donttest to reduce check time
 ## the function is designed for large scale problems
 X <- matrix(rnorm(50000*20, mean = 1), nrow = 50000)
 system.time(robloxbioc(X))
 
-## using Affymetrix-Data
+## using Affymetrix data
 ## confer example to generateExprVal.method.mas
 ## A more worked out example can be found in the scripts folder
 ## of the package.
@@ -167,13 +167,15 @@
 points(concentrations, rl[,1], pch = 20, col="orange", type="b")
 legend("topleft", c("MAS", "roblox"), pch = c(1, 20))
 
-require(affydata)
+## Affymetrix dilution data
+library(affydata)
 data(Dilution)
 eset <- robloxbioc(Dilution)
 ## Affymetrix scale normalization
 eset1 <- robloxbioc(Dilution, normalize = TRUE)
-## "Not run" just because of computation time
-require(beadarrayExampleData)
+
+## Illumina bead level data
+library(beadarrayExampleData)
 data(exampleBLData)
 res <- robloxbioc(exampleBLData, eps.upper = 0.5)
 res


From noreply at r-forge.r-project.org  Sun May  3 18:21:35 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 18:21:35 +0200 (CEST)
Subject: [Robast-commits] r828 -
	branches/robast-1.0/pkg/RobLoxBioC/tests/Examples
Message-ID: <20150503162135.AEBE91878D9@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 18:21:35 +0200 (Sun, 03 May 2015)
New Revision: 828

Modified:
   branches/robast-1.0/pkg/RobLoxBioC/tests/Examples/RobLoxBioC-Ex.Rout.save
Log:
update of Rout.save file

Modified: branches/robast-1.0/pkg/RobLoxBioC/tests/Examples/RobLoxBioC-Ex.Rout.save
===================================================================
--- branches/robast-1.0/pkg/RobLoxBioC/tests/Examples/RobLoxBioC-Ex.Rout.save	2015-05-03 16:03:31 UTC (rev 827)
+++ branches/robast-1.0/pkg/RobLoxBioC/tests/Examples/RobLoxBioC-Ex.Rout.save	2015-05-03 16:21:35 UTC (rev 828)
@@ -1,7 +1,6 @@
 
-R Under development (unstable) (2013-02-06 r61845) -- "Unsuffered Consequences"
-Copyright (C) 2013 The R Foundation for Statistical Computing
-ISBN 3-900051-07-0
+R Under development (unstable) (2015-05-02 r68310) -- "Unsuffered Consequences"
+Copyright (C) 2015 The R Foundation for Statistical Computing
 Platform: x86_64-unknown-linux-gnu (64-bit)
 
 R is free software and comes with ABSOLUTELY NO WARRANTY.
@@ -22,52 +21,18 @@
 > source(file.path(R.home("share"), "R", "examples-header.R"))
 > options(warn = 1)
 > library('RobLoxBioC')
-Loading required package: Biobase
-Loading required package: BiocGenerics
-Loading required package: parallel
-
-Attaching package: ?BiocGenerics?
-
-The following objects are masked from ?package:parallel?:
-
-    clusterApply, clusterApplyLB, clusterCall, clusterEvalQ,
-    clusterExport, clusterMap, parApply, parCapply, parLapply,
-    parLapplyLB, parRapply, parSapply, parSapplyLB
-
-The following object is masked from ?package:stats?:
-
-    xtabs
-
-The following objects are masked from ?package:base?:
-
-    Filter, Find, Map, Position, Reduce, anyDuplicated, as.data.frame,
-    cbind, colnames, duplicated, eval, get, intersect, lapply, mapply,
-    match, mget, order, paste, pmax, pmax.int, pmin, pmin.int, rank,
-    rbind, rep.int, rownames, sapply, setdiff, sort, table, tapply,
-    union, unique, unlist
-
-Welcome to Bioconductor
-
-    Vignettes contain introductory material; view with
-    'browseVignettes()'. To cite Bioconductor, see
-    'citation("Biobase")', and for packages 'citation("pkgname")'.
-
-Loading required package: affy
-Loading required package: beadarray
-Loading required package: ggplot2
-Welcome to beadarray version 2.9.1
-beadarray versions >= 2.0.0 are substantial updates from beadarray 1.16.0 and earlier. Please see package vignette for details
 Loading required package: distr
 Loading required package: startupmsg
-:startupmsg>  Utilities for start-up messages (version 0.8)
+:startupmsg>  Utilities for Start-Up Messages (version 0.9.1)
 :startupmsg> 
 :startupmsg>  For more information see ?"startupmsg",
 :startupmsg>  NEWS("startupmsg")
 
 Loading required package: sfsmisc
 Loading required package: SweaveListingUtils
-:SweaveListingUtils>  Utilities for Sweave together with
-:SweaveListingUtils>  TeX listings package (version 0.6)
+:SweaveListingUtils>  Utilities for Sweave Together with
+:SweaveListingUtils>  TeX 'listings' Package (version
+:SweaveListingUtils>  0.7)
 :SweaveListingUtils> 
 :SweaveListingUtils>  NOTE: Support for this package
 :SweaveListingUtils>  will stop soon.
@@ -95,12 +60,12 @@
 
 Attaching package: ?SweaveListingUtils?
 
-The following object is masked from ?package:base?:
+The following objects are masked from ?package:base?:
 
     library, require
 
-:distr>  Object oriented implementation of distributions (version
-:distr>  2.4)
+:distr>  Object Oriented Implementation of Distributions (version
+:distr>  2.6)
 :distr> 
 :distr>  Attention: Arithmetics on distribution objects are
 :distr>  understood as operations on corresponding random variables
@@ -121,128 +86,54 @@
 
 Attaching package: ?distr?
 
-The following object is masked from ?package:stats?:
+The following objects are masked from ?package:stats?:
 
     df, qqplot, sd
 
-Loading required package: RobLox
-Loading required package: lattice
-Loading required package: RColorBrewer
-Loading required package: distrMod
-Loading required package: distrEx
-:distrEx>  Extensions of package distr (version 2.4)
-:distrEx> 
-:distrEx>  Note: Packages "e1071", "moments", "fBasics" should be
-:distrEx>  attached /before/ package "distrEx". See
-:distrEx>  distrExMASK().Note: Extreme value distribution
-:distrEx>  functionality has been moved to
-:distrEx> 
-:distrEx>        package "RobExtremes". See distrExMOVED().
-:distrEx> 
-:distrEx>  For more information see ?"distrEx", NEWS("distrEx"), as
-:distrEx>  well as
-:distrEx>    http://distr.r-forge.r-project.org/
-:distrEx>  Package "distrDoc" provides a vignette to this package
-:distrEx>  as well as to several related packages; try
-:distrEx>  vignette("distr").
+Loading required package: affy
+Loading required package: BiocGenerics
+Loading required package: parallel
 
+Attaching package: ?BiocGenerics?
 
-Attaching package: ?distrEx?
+The following objects are masked from ?package:parallel?:
 
-The following object is masked from ?package:stats?:
+    clusterApply, clusterApplyLB, clusterCall, clusterEvalQ,
+    clusterExport, clusterMap, parApply, parCapply, parLapply,
+    parLapplyLB, parRapply, parSapply, parSapplyLB
 
-    IQR, mad, median, var
+The following objects are masked from ?package:distr?:
 
-Loading required package: RandVar
-:RandVar>  Implementation of random variables (version 0.9)
-:RandVar> 
-:RandVar>  For more information see ?"RandVar", NEWS("RandVar"), as
-:RandVar>  well as
-:RandVar>    http://robast.r-forge.r-project.org/
-:RandVar>  This package also includes a vignette; try
-:RandVar>  vignette("RandVar").
+    width, width<-
 
-Loading required package: MASS
-Loading required package: stats4
-:distrMod>  Object oriented implementation of probability models
-:distrMod>  (version 2.4)
-:distrMod> 
-:distrMod>  Some functions from pkg's 'base' and 'stats' are
-:distrMod>  intentionally masked ---see distrModMASK().
-:distrMod> 
-:distrMod>  Note that global options are controlled by
-:distrMod>  distrModoptions() ---c.f. ?"distrModoptions".
-:distrMod> 
-:distrMod>  For more information see ?"distrMod",
-:distrMod>  NEWS("distrMod"), as well as
-:distrMod>    http://distr.r-forge.r-project.org/
-:distrMod>  There is a vignette to this package; try
-:distrMod>  vignette("distrMod").
-:distrMod>  Package "distrDoc" provides a vignette to the other
-:distrMod>  distrXXX packages,
-:distrMod>  as well as to several related packages; try
-:distrMod>  vignette("distr").
-
-
-Attaching package: ?distrMod?
-
-The following object is masked from ?package:stats4?:
-
-    confint
-
 The following object is masked from ?package:stats?:
 
-    confint
+    xtabs
 
-The following object is masked from ?package:base?:
+The following objects are masked from ?package:base?:
 
-    norm
+    Filter, Find, Map, Position, Reduce, anyDuplicated, append,
+    as.data.frame, as.vector, cbind, colnames, do.call, duplicated,
+    eval, evalq, get, intersect, is.unsorted, lapply, mapply, match,
+    mget, order, paste, pmax, pmax.int, pmin, pmin.int, rank, rbind,
+    rep.int, rownames, sapply, setdiff, sort, table, tapply, union,
+    unique, unlist, unsplit
 
-Loading required package: RobAStBase
-Loading required package: rrcov
-Loading required package: robustbase
-Loading required package: pcaPP
-Loading required package: mvtnorm
-Scalable Robust Estimators with High Breakdown Point (version 1.3-02)
+Loading required package: Biobase
+Welcome to Bioconductor
 
-:RobAStBase>  Robust Asymptotic Statistics (version 0.9)
-:RobAStBase> 
-:RobAStBase>  Some functions from pkg's 'stats' and 'graphics'
-:RobAStBase>  are intentionally masked ---see RobAStBaseMASK().
-:RobAStBase> 
-:RobAStBase>  Note that global options are controlled by
-:RobAStBase>  RobAStBaseoptions() ---c.f. ?"RobAStBaseoptions".
-:RobAStBase> 
-:RobAStBase>  For more information see ?"RobAStBase",
-:RobAStBase>  NEWS("RobAStBase"), as well as
-:RobAStBase>    http://robast.r-forge.r-project.org/
+    Vignettes contain introductory material; view with
+    'browseVignettes()'. To cite Bioconductor, see
+    'citation("Biobase")', and for packages 'citation("pkgname")'.
 
-
-Attaching package: ?RobAStBase?
-
-The following object is masked from ?package:graphics?:
-
-    clip
-
 > 
 > base::assign(".oldSearch", base::search(), pos = 'CheckExEnv')
-> base::assign(".ExTimings", "RobLoxBioC-Ex.timings", pos = 'CheckExEnv')
-> base::cat("name\tuser\tsystem\telapsed\n", file=base::get(".ExTimings", pos = 'CheckExEnv'))
-> base::assign(".format_ptime",
-+ function(x) {
-+   if(!is.na(x[4L])) x[1L] <- x[1L] + x[4L]
-+   if(!is.na(x[5L])) x[2L] <- x[2L] + x[5L]
-+   format(x[1L:3L])
-+ },
-+ pos = 'CheckExEnv')
-> 
 > cleanEx()
 > nameEx("0RobLoxBioC-package")
 > ### * 0RobLoxBioC-package
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: RobLoxBioC-package
 > ### Title: Infinitesimally robust estimators for preprocessing omics data
 > ### Aliases: RobLoxBioC-package RobLoxBioC
@@ -254,23 +145,19 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("0RobLoxBioC-package", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("KolmogorovMinDist")
 > ### * KolmogorovMinDist
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: KolmogorovMinDist
 > ### Title: Generic Function for Computing Minimum Kolmogorov Distance for
 > ###   Biological Data
 > ### Aliases: KolmogorovMinDist KolmogorovMinDist-methods
 > ###   KolmogorovMinDist,matrix,Norm-method
 > ###   KolmogorovMinDist,AffyBatch,AbscontDistribution-method
-> ###   KolmogorovMinDist,BeadLevelList,AbscontDistribution-method
+> ###   KolmogorovMinDist,beadLevelData,AbscontDistribution-method
 > ### Keywords: robust
 > 
 > ### ** Examples
@@ -288,7 +175,7 @@
 [1] 100 100
 
 > 
-> ## using Affymetrix-Data
+> ## using Affymetrix data
 > data(SpikeIn)
 > probes <- log2(pm(SpikeIn))
 > (res <- KolmogorovMinDist(probes, Norm()))
@@ -302,50 +189,15 @@
 
 > boxplot(res$dist)
 > 
-> ## Not run: 
-> ##D ## "Not run" just because of computation time
-> ##D require(affydata)
-> ##D data(Dilution)
-> ##D res <- KolmogorovMinDist(Dilution[,1], Norm())
-> ##D summary(res$dist)
-> ##D boxplot(res$dist)
-> ##D plot(res$n, res$dist, pch = 20, main = "Kolmogorov distance vs. sample size",
-> ##D      xlab = "sample size", ylab = "Kolmogorov distance",
-> ##D      ylim = c(0, max(res$dist)))
-> ##D uni.n <- min(res$n):max(res$n)
-> ##D lines(uni.n, 1/(2*uni.n), col = "orange", lwd = 2)
-> ##D legend("topright", legend = "minimal possible distance", fill = "orange")
-> ## End(Not run)
 > 
-> ## using Illumina-Data
-> ## Not run: 
-> ##D ## "Not run" just because of computation time
-> ##D data(BLData)
-> ##D res <- KolmogorovMinDist(BLData, Norm(), arrays = 1)
-> ##D res1 <- KolmogorovMinDist(BLData, log = TRUE, Norm(), arrays = 1)
-> ##D summary(cbind(res$dist, res1$dist))
-> ##D boxplot(list(res$dist, res1$dist), names = c("raw", "log-raw"))
-> ##D sort(unique(res1$n))
-> ##D plot(res1$n, res1$dist, pch = 20, main = "Kolmogorov distance vs. sample size",
-> ##D      xlab = "sample size", ylab = "Kolmogorov distance",
-> ##D      ylim = c(0, max(res1$dist)), xlim = c(min(res1$n), 56))
-> ##D uni.n <- min(res1$n):56
-> ##D lines(uni.n, 1/(2*uni.n), col = "orange", lwd = 2)
-> ##D legend("topright", legend = "minimal possible distance", fill = "orange")
-> ## End(Not run)
 > 
 > 
-> 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("KolmogorovMinDist", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("SimStudies")
 > ### * SimStudies
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: SimStudies
 > ### Title: Perform Monte-Carlo Study.
 > ### Aliases: AffySimStudy IlluminaSimStudy
@@ -379,16 +231,12 @@
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("SimStudies", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("robloxbioc")
 > ### * robloxbioc
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: robloxbioc
 > ### Title: Generic Function for Preprocessing Biological Data
 > ### Aliases: robloxbioc robloxbioc-methods robloxbioc,matrix-method
@@ -419,47 +267,14 @@
 [1,] -0.02545634 1.042738
 [2,] -0.16757528 1.004658
 > 
-> ## Don't run to reduce check time on CRAN
-> ## Not run: 
-> ##D ## the function is designed for large scale problems
-> ##D X <- matrix(rnorm(50000*20, mean = 1), nrow = 50000)
-> ##D system.time(robloxbioc(X))
-> ##D 
-> ##D ## using Affymetrix-Data
-> ##D ## confer example to generateExprVal.method.mas
-> ##D ## A more worked out example can be found in the scripts folder
-> ##D ## of the package.
-> ##D data(SpikeIn)
-> ##D probes <- pm(SpikeIn) 
-> ##D mas <- generateExprVal.method.mas(probes)
-> ##D rl <- 2^robloxbioc(log2(t(probes)))
-> ##D concentrations <- as.numeric(colnames(SpikeIn))
-> ##D plot(concentrations, mas$exprs, log="xy", ylim=c(50,10000), type="b",
-> ##D      ylab = "expression measures")
-> ##D points(concentrations, rl[,1], pch = 20, col="orange", type="b")
-> ##D legend("topleft", c("MAS", "roblox"), pch = c(1, 20))
-> ##D 
-> ##D require(affydata)
-> ##D data(Dilution)
-> ##D eset <- robloxbioc(Dilution)
-> ##D ## Affymetrix scale normalization
-> ##D eset1 <- robloxbioc(Dilution, normalize = TRUE)
-> ##D ## "Not run" just because of computation time
-> ##D require(beadarrayExampleData)
-> ##D data(exampleBLData)
-> ##D res <- robloxbioc(exampleBLData, eps.upper = 0.5)
-> ##D res
-> ## End(Not run)
 > 
 > 
 > 
-> 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("robloxbioc", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > ### * <FOOTER>
 > ###
+> options(digits = 7L)
 > base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
-Time elapsed:  12.136 0.156 12.385 0 0 
+Time elapsed:  4.889 0.08 4.966 0 0 
 > grDevices::dev.off()
 pdf 
   2 


From noreply at r-forge.r-project.org  Sun May  3 18:49:05 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 18:49:05 +0200 (CEST)
Subject: [Robast-commits] r829 - branches/robast-1.0/pkg/ROptRegTS
Message-ID: <20150503164905.513E3186196@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 18:49:05 +0200 (Sun, 03 May 2015)
New Revision: 829

Modified:
   branches/robast-1.0/pkg/ROptRegTS/DESCRIPTION
Log:
update of package DESCRIPTION

Modified: branches/robast-1.0/pkg/ROptRegTS/DESCRIPTION
===================================================================
--- branches/robast-1.0/pkg/ROptRegTS/DESCRIPTION	2015-05-03 16:21:35 UTC (rev 828)
+++ branches/robast-1.0/pkg/ROptRegTS/DESCRIPTION	2015-05-03 16:49:05 UTC (rev 829)
@@ -1,14 +1,13 @@
 Package: ROptRegTS
 Version: 1.0
-Date: 2013-09-12
+Date: 2015-05-03
 Title: Optimally Robust Estimation for Regression-Type Models
 Description: Optimally robust estimation for regression-type models using S4 classes and
         methods.
-Depends: R (>= 2.14.0), methods, distr(>= 2.5.2), distrEx(>= 2.5), RandVar(>= 0.9.2),
-        ROptEstOld(>= 0.9.1)
+Depends: R (>= 2.14.0), methods, ROptEstOld(>= 0.9.1) 
+Imports: distr(>= 2.5.2), distrEx(>= 2.5), RandVar(>= 0.9.2)
 Authors at R: c(person("Matthias", "Kohl", role=c("cre", "cph"), email="Matthias.Kohl at stamats.de"), 
 		person("Peter", "Ruckdeschel", role=c("aut", "cph")))
-LazyLoad: yes
 ByteCompile: yes
 License: LGPL-3
 Encoding: latin1


From noreply at r-forge.r-project.org  Sun May  3 18:52:13 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 18:52:13 +0200 (CEST)
Subject: [Robast-commits] r830 - branches/robast-1.0/pkg/ROptEst/man
Message-ID: <20150503165214.0059118729A@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 18:52:13 +0200 (Sun, 03 May 2015)
New Revision: 830

Modified:
   branches/robast-1.0/pkg/ROptEst/man/0ROptEst-package.Rd
Log:
update of package Rd file

Modified: branches/robast-1.0/pkg/ROptEst/man/0ROptEst-package.Rd
===================================================================
--- branches/robast-1.0/pkg/ROptEst/man/0ROptEst-package.Rd	2015-05-03 16:49:05 UTC (rev 829)
+++ branches/robast-1.0/pkg/ROptEst/man/0ROptEst-package.Rd	2015-05-03 16:52:13 UTC (rev 830)
@@ -32,6 +32,9 @@
 \references{
   M. Kohl (2005). Numerical Contributions to the Asymptotic Theory of Robustness.
   Dissertation. University of Bayreuth.
+
+  M. Kohl, P. Ruckdeschel, H. Rieder (2010). Infinitesimally Robust Estimation in 
+  General Smoothly Parametrized Models. Statistical Methods and Application 19(3):333?354. 
 }
 \seealso{
 \code{\link[distr:0distr-package]{distr-package}}, 


From noreply at r-forge.r-project.org  Sun May  3 18:52:25 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 18:52:25 +0200 (CEST)
Subject: [Robast-commits] r831 -
	branches/robast-1.0/pkg/ROptRegTS/tests/Examples
Message-ID: <20150503165225.E8AE718729A@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 18:52:25 +0200 (Sun, 03 May 2015)
New Revision: 831

Modified:
   branches/robast-1.0/pkg/ROptRegTS/tests/Examples/ROptRegTS-Ex.Rout.save
Log:
update of Rout.save file

Modified: branches/robast-1.0/pkg/ROptRegTS/tests/Examples/ROptRegTS-Ex.Rout.save
===================================================================
--- branches/robast-1.0/pkg/ROptRegTS/tests/Examples/ROptRegTS-Ex.Rout.save	2015-05-03 16:52:13 UTC (rev 830)
+++ branches/robast-1.0/pkg/ROptRegTS/tests/Examples/ROptRegTS-Ex.Rout.save	2015-05-03 16:52:25 UTC (rev 831)
@@ -1,7 +1,6 @@
 
-R Under development (unstable) (2013-03-13 r62247) -- "Unsuffered Consequences"
-Copyright (C) 2013 The R Foundation for Statistical Computing
-ISBN 3-900051-07-0
+R Under development (unstable) (2015-05-02 r68310) -- "Unsuffered Consequences"
+Copyright (C) 2015 The R Foundation for Statistical Computing
 Platform: x86_64-unknown-linux-gnu (64-bit)
 
 R is free software and comes with ABSOLUTELY NO WARRANTY.
@@ -22,18 +21,19 @@
 > source(file.path(R.home("share"), "R", "examples-header.R"))
 > options(warn = 1)
 > library('ROptRegTS')
+Loading required package: ROptEstOld
 Loading required package: distr
 Loading required package: startupmsg
-:startupmsg>  Utilities for start-up messages (version 0.8)
+:startupmsg>  Utilities for Start-Up Messages (version 0.9.1)
 :startupmsg> 
 :startupmsg>  For more information see ?"startupmsg",
 :startupmsg>  NEWS("startupmsg")
 
 Loading required package: sfsmisc
 Loading required package: SweaveListingUtils
-:SweaveListingUtils>  Utilities for Sweave together with
-:SweaveListingUtils>  TeX listings package (version
-:SweaveListingUtils>  0.6.1)
+:SweaveListingUtils>  Utilities for Sweave Together with
+:SweaveListingUtils>  TeX 'listings' Package (version
+:SweaveListingUtils>  0.7)
 :SweaveListingUtils> 
 :SweaveListingUtils>  NOTE: Support for this package
 :SweaveListingUtils>  will stop soon.
@@ -61,12 +61,12 @@
 
 Attaching package: ?SweaveListingUtils?
 
-The following object is masked from ?package:base?:
+The following objects are masked from ?package:base?:
 
     library, require
 
-:distr>  Object oriented implementation of distributions (version
-:distr>  2.4)
+:distr>  Object Oriented Implementation of Distributions (version
+:distr>  2.6)
 :distr> 
 :distr>  Attention: Arithmetics on distribution objects are
 :distr>  understood as operations on corresponding random variables
@@ -87,12 +87,12 @@
 
 Attaching package: ?distr?
 
-The following object is masked from ?package:stats?:
+The following objects are masked from ?package:stats?:
 
     df, qqplot, sd
 
 Loading required package: distrEx
-:distrEx>  Extensions of package distr (version 2.4)
+:distrEx>  Extensions of Package 'distr' (version 2.6)
 :distrEx> 
 :distrEx>  Note: Packages "e1071", "moments", "fBasics" should be
 :distrEx>  attached /before/ package "distrEx". See
@@ -111,12 +111,12 @@
 
 Attaching package: ?distrEx?
 
-The following object is masked from ?package:stats?:
+The following objects are masked from ?package:stats?:
 
     IQR, mad, median, var
 
 Loading required package: RandVar
-:RandVar>  Implementation of random variables (version 0.9)
+:RandVar>  Implementation of Random Variables (version 1.0)
 :RandVar> 
 :RandVar>  For more information see ?"RandVar", NEWS("RandVar"), as
 :RandVar>  well as
@@ -124,7 +124,6 @@
 :RandVar>  This package also includes a vignette; try
 :RandVar>  vignette("RandVar").
 
-Loading required package: ROptEstOld
 Loading required package: evd
 
 Attaching package: ?ROptEstOld?
@@ -1205,7 +1204,7 @@
 {
     as.vector(x[1:1L] * (x[1L + 1] - x[1:1L] %*% 0))
 }
-<environment: 0xa6549e0>
+<environment: 0xadbe4c8>
 
 > FisherInfo(LM1)
 An object of class "PosDefSymmMatrix"
@@ -1261,7 +1260,7 @@
 {
     as.vector(x[1:1L] * (x[1L + 1] - x[1:1L] %*% 0 - 0))
 }
-<environment: 0xa4c53f8>
+<environment: 0xcd1a550>
 
 > FisherInfo(LM1)
 An object of class "PosDefSymmMatrix"
@@ -1319,7 +1318,7 @@
 {
     as.vector(x[1:1L] * (x[1L + 1] - x[1:1L] %*% 0)/1^2)
 }
-<environment: 0xaa67150>
+<environment: 0xb960ea0>
 
 > FisherInfo(LM1)
 An object of class "PosDefSymmMatrix"
@@ -1405,8 +1404,9 @@
 > 
 > ### * <FOOTER>
 > ###
+> options(digits = 7L)
 > base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
-Time elapsed:  21.925 0.108 22.113 0 0 
+Time elapsed:  6.764 0.048 6.807 0 0 
 > grDevices::dev.off()
 null device 
           1 


From noreply at r-forge.r-project.org  Sun May  3 19:36:52 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 19:36:52 +0200 (CEST)
Subject: [Robast-commits] r832 - branches/robast-1.0/pkg/RobRex
Message-ID: <20150503173652.554DD18792C@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 19:36:52 +0200 (Sun, 03 May 2015)
New Revision: 832

Modified:
   branches/robast-1.0/pkg/RobRex/DESCRIPTION
   branches/robast-1.0/pkg/RobRex/NAMESPACE
Log:
updates to DESCRIPTION and NAMESPACE

Modified: branches/robast-1.0/pkg/RobRex/DESCRIPTION
===================================================================
--- branches/robast-1.0/pkg/RobRex/DESCRIPTION	2015-05-03 16:52:25 UTC (rev 831)
+++ branches/robast-1.0/pkg/RobRex/DESCRIPTION	2015-05-03 17:36:52 UTC (rev 832)
@@ -1,13 +1,13 @@
 Package: RobRex
 Version: 1.0
-Date: 2013-09-12
+Date: 2015-05-03
 Title: Optimally Robust Influence Curves for Regression and Scale
 Description: Functions for the determination of optimally robust influence curves in case of
         linear regression with unknown scale and standard normal distributed errors where the
         regressor is random.
 Depends: R (>= 2.14.0), ROptRegTS(>= 0.9.2)
+Imports: distr(>= 2.5.2), RandVar(>= 0.9.2), RobAStBase(>= 0.9)
 Authors at R: person("Matthias", "Kohl", role=c("cre", "cph"), email="Matthias.Kohl at stamats.de")
-LazyLoad: yes
 ByteCompile: yes
 License: LGPL-3
 Encoding: latin1

Modified: branches/robast-1.0/pkg/RobRex/NAMESPACE
===================================================================
--- branches/robast-1.0/pkg/RobRex/NAMESPACE	2015-05-03 16:52:25 UTC (rev 831)
+++ branches/robast-1.0/pkg/RobRex/NAMESPACE	2015-05-03 17:36:52 UTC (rev 832)
@@ -1,3 +1,6 @@
+import(distr)
+import(RandVar)
+importFrom("RobAStBase", "IC", "ContNeighborhood")
 import(ROptRegTS)
 export(rgsOptIC.AL, 
        rgsOptIC.M, 


From noreply at r-forge.r-project.org  Sun May  3 19:41:24 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 19:41:24 +0200 (CEST)
Subject: [Robast-commits] r833 -
	branches/robast-1.0/pkg/RobRex/tests/Examples
Message-ID: <20150503174124.9FCE8184220@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 19:41:24 +0200 (Sun, 03 May 2015)
New Revision: 833

Modified:
   branches/robast-1.0/pkg/RobRex/tests/Examples/RobRex-Ex.Rout.save
Log:
update of Rout.save file

Modified: branches/robast-1.0/pkg/RobRex/tests/Examples/RobRex-Ex.Rout.save
===================================================================
--- branches/robast-1.0/pkg/RobRex/tests/Examples/RobRex-Ex.Rout.save	2015-05-03 17:36:52 UTC (rev 832)
+++ branches/robast-1.0/pkg/RobRex/tests/Examples/RobRex-Ex.Rout.save	2015-05-03 17:41:24 UTC (rev 833)
@@ -1,7 +1,7 @@
 
-R version 2.10.0 beta (2009-10-15 r50107)
-Copyright (C) 2009 The R Foundation for Statistical Computing
-ISBN 3-900051-07-0
+R Under development (unstable) (2015-05-02 r68310) -- "Unsuffered Consequences"
+Copyright (C) 2015 The R Foundation for Statistical Computing
+Platform: x86_64-unknown-linux-gnu (64-bit)
 
 R is free software and comes with ABSOLUTELY NO WARRANTY.
 You are welcome to redistribute it under certain conditions.
@@ -17,88 +17,32 @@
 'help.start()' for an HTML browser interface to help.
 Type 'q()' to quit R.
 
-> ### * <HEADER>
-> ###
-> attach(NULL, name = "CheckExEnv")
-> assign("nameEx",
-+        local({
-+ 	   s <- "__{must remake R-ex/*.R}__"
-+            function(new) {
-+                if(!missing(new)) s <<- new else s
-+            }
-+        }),
-+        pos = "CheckExEnv")
-> ## Add some hooks to label plot pages for base and grid graphics
-> assign("base_plot_hook",
-+        function() {
-+            pp <- par(c("mfg","mfcol","oma","mar"))
-+            if(all(pp$mfg[1:2] == c(1, pp$mfcol[2]))) {
-+                outer <- (oma4 <- pp$oma[4]) > 0; mar4 <- pp$mar[4]
-+                mtext(sprintf("help(\"%s\")", nameEx()), side = 4,
-+                      line = if(outer)max(1, oma4 - 1) else min(1, mar4 - 1),
-+                outer = outer, adj = 1, cex = .8, col = "orchid", las=3)
-+            }
-+        },
-+        pos = "CheckExEnv")
-> assign("grid_plot_hook",
-+        function() {
-+            grid::pushViewport(grid::viewport(width=grid::unit(1, "npc") -
-+                               grid::unit(1, "lines"), x=0, just="left"))
-+            grid::grid.text(sprintf("help(\"%s\")", nameEx()),
-+                            x=grid::unit(1, "npc") + grid::unit(0.5, "lines"),
-+                            y=grid::unit(0.8, "npc"), rot=90,
-+                            gp=grid::gpar(col="orchid"))
-+        },
-+        pos = "CheckExEnv")
-> setHook("plot.new",     get("base_plot_hook", pos = "CheckExEnv"))
-> setHook("persp",        get("base_plot_hook", pos = "CheckExEnv"))
-> setHook("grid.newpage", get("grid_plot_hook", pos = "CheckExEnv"))
-> assign("cleanEx",
-+        function(env = .GlobalEnv) {
-+ 	   rm(list = ls(envir = env, all.names = TRUE), envir = env)
-+            RNGkind("default", "default")
-+ 	   set.seed(1)
-+    	   options(warn = 1)
-+ 	   .CheckExEnv <- as.environment("CheckExEnv")
-+ 	   delayedAssign("T", stop("T used instead of TRUE"),
-+ 		  assign.env = .CheckExEnv)
-+ 	   delayedAssign("F", stop("F used instead of FALSE"),
-+ 		  assign.env = .CheckExEnv)
-+ 	   sch <- search()
-+ 	   newitems <- sch[! sch %in% .oldSearch]
-+ 	   for(item in rev(newitems))
-+                eval(substitute(detach(item), list(item=item)))
-+ 	   missitems <- .oldSearch[! .oldSearch %in% sch]
-+ 	   if(length(missitems))
-+ 	       warning("items ", paste(missitems, collapse=", "),
-+ 		       " have been removed from the search path")
-+        },
-+        pos = "CheckExEnv")
-> assign("ptime", proc.time(), pos = "CheckExEnv")
-> ## at least one package changes these via ps.options(), so do this
-> ## before loading the package.
-> ## Use postscript as incomplete files may be viewable, unlike PDF.
-> ## Choose a size that is close to on-screen devices, fix paper
-> grDevices::ps.options(width = 7, height = 7, paper = "a4", reset = TRUE)
-> grDevices::postscript("RobRex-Ex.ps")
-> 
-> assign("par.postscript", graphics::par(no.readonly = TRUE), pos = "CheckExEnv")
-> options(contrasts = c(unordered = "contr.treatment", ordered = "contr.poly"))
+> pkgname <- "RobRex"
+> source(file.path(R.home("share"), "R", "examples-header.R"))
 > options(warn = 1)
 > library('RobRex')
 Loading required package: ROptRegTS
+Loading required package: ROptEstOld
 Loading required package: distr
 Loading required package: startupmsg
-:startupmsg>  Utilities for start-up messages (version 0.7)
+:startupmsg>  Utilities for Start-Up Messages (version 0.9.1)
 :startupmsg> 
 :startupmsg>  For more information see ?"startupmsg",
 :startupmsg>  NEWS("startupmsg")
 
 Loading required package: sfsmisc
 Loading required package: SweaveListingUtils
-:SweaveListingUtils>  Utilities for Sweave together with
-:SweaveListingUtils>  TeX listings package (version 0.4)
+:SweaveListingUtils>  Utilities for Sweave Together with
+:SweaveListingUtils>  TeX 'listings' Package (version
+:SweaveListingUtils>  0.7)
 :SweaveListingUtils> 
+:SweaveListingUtils>  NOTE: Support for this package
+:SweaveListingUtils>  will stop soon.
+:SweaveListingUtils> 
+:SweaveListingUtils>  Package 'knitr' is providing the
+:SweaveListingUtils>  same functionality in a better
+:SweaveListingUtils>  way.
+:SweaveListingUtils> 
 :SweaveListingUtils>  Some functions from package 'base'
 :SweaveListingUtils>  are intentionally masked ---see
 :SweaveListingUtils>  SweaveListingMASK().
@@ -116,16 +60,14 @@
 :SweaveListingUtils>  vignette("ExampleSweaveListingUtils").
 
 
-Attaching package: 'SweaveListingUtils'
+Attaching package: ?SweaveListingUtils?
 
+The following objects are masked from ?package:base?:
 
-	The following object(s) are masked from package:base :
+    library, require
 
-	 library,
-	 require 
-
-:distr>  Object orientated implementation of distributions (version
-:distr>  2.2)
+:distr>  Object Oriented Implementation of Distributions (version
+:distr>  2.6)
 :distr> 
 :distr>  Attention: Arithmetics on distribution objects are
 :distr>  understood as operations on corresponding random variables
@@ -144,31 +86,22 @@
 :distr>  vignette("distr").
 
 
-Attaching package: 'distr'
+Attaching package: ?distr?
 
+The following objects are masked from ?package:stats?:
 
-	The following object(s) are masked from package:stats :
+    df, qqplot, sd
 
-	 df,
-	 qqplot,
-	 sd 
-
 Loading required package: distrEx
-Loading required package: evd
-Loading required package: actuar
-
-Attaching package: 'actuar'
-
-
-	The following object(s) are masked from package:grDevices :
-
-	 cm 
-
-:distrEx>  Extensions of package distr (version 2.2)
+:distrEx>  Extensions of Package 'distr' (version 2.6)
 :distrEx> 
 :distrEx>  Note: Packages "e1071", "moments", "fBasics" should be
-:distrEx>  attached /before/ package "distrEx". See distrExMASK().
+:distrEx>  attached /before/ package "distrEx". See
+:distrEx>  distrExMASK().Note: Extreme value distribution
+:distrEx>  functionality has been moved to
 :distrEx> 
+:distrEx>        package "RobExtremes". See distrExMOVED().
+:distrEx> 
 :distrEx>  For more information see ?"distrEx", NEWS("distrEx"), as
 :distrEx>  well as
 :distrEx>    http://distr.r-forge.r-project.org/
@@ -177,18 +110,14 @@
 :distrEx>  vignette("distr").
 
 
-Attaching package: 'distrEx'
+Attaching package: ?distrEx?
 
+The following objects are masked from ?package:stats?:
 
-	The following object(s) are masked from package:stats :
+    IQR, mad, median, var
 
-	 IQR,
-	 mad,
-	 median,
-	 var 
-
 Loading required package: RandVar
-:RandVar>  Implementation of random variables (version 0.7)
+:RandVar>  Implementation of Random Variables (version 1.0)
 :RandVar> 
 :RandVar>  For more information see ?"RandVar", NEWS("RandVar"), as
 :RandVar>  well as
@@ -196,19 +125,18 @@
 :RandVar>  This package also includes a vignette; try
 :RandVar>  vignette("RandVar").
 
-Loading required package: ROptEstOld
+Loading required package: evd
 
-Attaching package: 'ROptEstOld'
+Attaching package: ?ROptEstOld?
 
+The following object is masked from ?package:graphics?:
 
-	The following object(s) are masked from package:graphics :
+    clip
 
-	 clip 
-
 > 
-> assign(".oldSearch", search(), pos = 'CheckExEnv')
-> assign(".oldNS", loadedNamespaces(), pos = 'CheckExEnv')
-> cleanEx(); nameEx("rgsOptIC.AL")
+> base::assign(".oldSearch", base::search(), pos = 'CheckExEnv')
+> cleanEx()
+> nameEx("rgsOptIC.AL")
 > ### * rgsOptIC.AL
 > 
 > flush(stderr()); flush(stdout())
@@ -251,7 +179,8 @@
 > 
 > 
 > 
-> cleanEx(); nameEx("rgsOptIC.ALc")
+> cleanEx()
+> nameEx("rgsOptIC.ALc")
 > ### * rgsOptIC.ALc
 > 
 > flush(stderr()); flush(stdout())
@@ -286,7 +215,8 @@
 > 
 > 
 > 
-> cleanEx(); nameEx("rgsOptIC.ALs")
+> cleanEx()
+> nameEx("rgsOptIC.ALs")
 > ### * rgsOptIC.ALs
 > 
 > flush(stderr()); flush(stdout())
@@ -309,7 +239,8 @@
 > 
 > 
 > 
-> cleanEx(); nameEx("rgsOptIC.BM")
+> cleanEx()
+> nameEx("rgsOptIC.BM")
 > ### * rgsOptIC.BM
 > 
 > flush(stderr()); flush(stdout())
@@ -331,7 +262,8 @@
 > 
 > 
 > 
-> cleanEx(); nameEx("rgsOptIC.M")
+> cleanEx()
+> nameEx("rgsOptIC.M")
 > ### * rgsOptIC.M
 > 
 > flush(stderr()); flush(stdout())
@@ -353,7 +285,8 @@
 > 
 > 
 > 
-> cleanEx(); nameEx("rgsOptIC.MK")
+> cleanEx()
+> nameEx("rgsOptIC.MK")
 > ### * rgsOptIC.MK
 > 
 > flush(stderr()); flush(stdout())
@@ -375,7 +308,8 @@
 > 
 > 
 > 
-> cleanEx(); nameEx("rgsOptIC.Mc")
+> cleanEx()
+> nameEx("rgsOptIC.Mc")
 > ### * rgsOptIC.Mc
 > 
 > flush(stderr()); flush(stdout())
@@ -397,7 +331,8 @@
 > 
 > 
 > 
-> cleanEx(); nameEx("rgsOptIC.Ms")
+> cleanEx()
+> nameEx("rgsOptIC.Ms")
 > ### * rgsOptIC.Ms
 > 
 > flush(stderr()); flush(stdout())
@@ -421,8 +356,9 @@
 > 
 > ### * <FOOTER>
 > ###
-> cat("Time elapsed: ", proc.time() - get("ptime", pos = 'CheckExEnv'),"\n")
-Time elapsed:  15.664 0.132 18.409 0.004 0.004 
+> options(digits = 7L)
+> base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
+Time elapsed:  6.473 0.068 6.537 0 0 
 > grDevices::dev.off()
 null device 
           1 


From noreply at r-forge.r-project.org  Sun May  3 19:50:33 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 19:50:33 +0200 (CEST)
Subject: [Robast-commits] r834 - in branches/robast-1.0/pkg/RobAStRDA: . man
Message-ID: <20150503175033.A8B471876E1@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 19:50:33 +0200 (Sun, 03 May 2015)
New Revision: 834

Modified:
   branches/robast-1.0/pkg/RobAStRDA/DESCRIPTION
   branches/robast-1.0/pkg/RobAStRDA/NAMESPACE
   branches/robast-1.0/pkg/RobAStRDA/man/0RobRDA-package.Rd
Log:
updates to DESCRIPTION and NAMESPACE, Depends and Imports simplified

Modified: branches/robast-1.0/pkg/RobAStRDA/DESCRIPTION
===================================================================
--- branches/robast-1.0/pkg/RobAStRDA/DESCRIPTION	2015-05-03 17:41:24 UTC (rev 833)
+++ branches/robast-1.0/pkg/RobAStRDA/DESCRIPTION	2015-05-03 17:50:33 UTC (rev 834)
@@ -1,11 +1,10 @@
 Package: RobAStRDA
 Version: 1.0
-Date: 2013-09-12
+Date: 2015-05-03
 Title: Interpolation Grids for Packages of RobASt - Family of Pkgs
-Description: sysdata.rda file for packages of RobASt - Family of Pkgs; is currently used by pkg
-        RobExtremes only.
-Depends: R (>= 2.14.0), methods
-Imports: startupmsg
+Description: Includes sysdata.rda file for packages of RobASt - family of packages; 
+             is currently used by package RobExtremes only.
+Depends: R (>= 2.14.0)
 Authors at R: c(person("Matthias", "Kohl", role=c("aut", "cph")), 
 		person("Bernhard", "Spangl", role="ctb", comment="helped with manual smoothing of the interpolators"), 
 		person("Mykhailo", "Pupashenko", role="ctb", comment="helped with manual smoothing of the interpolators"), 
@@ -13,7 +12,6 @@
 		person("Gerald", "Kroisandt", role="ctb", comment="helped with manual smoothing of the interpolators"), 
 		person("Peter", "Ruckdeschel", role=c("cre", "cph"), email="Peter.Ruckdeschel at itwm.fraunhofer.de"))
 LazyData: yes
-LazyLoad: yes
 ByteCompile: yes
 License: LGPL-3
 URL: http://robast.r-forge.r-project.org/

Modified: branches/robast-1.0/pkg/RobAStRDA/NAMESPACE
===================================================================
--- branches/robast-1.0/pkg/RobAStRDA/NAMESPACE	2015-05-03 17:41:24 UTC (rev 833)
+++ branches/robast-1.0/pkg/RobAStRDA/NAMESPACE	2015-05-03 17:50:33 UTC (rev 834)
@@ -1,2 +1,2 @@
-import(methods)
-importFrom("startupmsg", "buildStartupMessage", "infoShow")
+
+

Modified: branches/robast-1.0/pkg/RobAStRDA/man/0RobRDA-package.Rd
===================================================================
--- branches/robast-1.0/pkg/RobAStRDA/man/0RobRDA-package.Rd	2015-05-03 17:41:24 UTC (rev 833)
+++ branches/robast-1.0/pkg/RobAStRDA/man/0RobRDA-package.Rd	2015-05-03 17:50:33 UTC (rev 834)
@@ -3,7 +3,7 @@
 \alias{RobRDA}
 \docType{package}
 \title{
-RobRDA a sysdata.rda only package
+Interpolation Grids for Packages of RobASt - Family of Pkgs
 }
 \description{
 This package only contains sysdata.rda (with corresponding interpolation grids
@@ -32,11 +32,9 @@
 \tabular{ll}{
 Package: \tab RobAStRDA \cr
 Version: \tab 1.0 \cr
-Date: \tab 2013-09-12 \cr
-Depends: \tab R (>= 2.14.0), methods \cr
-Imports: ROptEst (>= 0.9)
+Date: \tab 2015-05-03 \cr
+Depends: \tab R (>= 2.14.0) \cr
 LazyData: \tab yes \cr
-LazyLoad: \tab yes \cr
 ByteCompile: \tab yes \cr
 License: \tab LGPL-3 \cr
 URL: \tab http://robast.r-forge.r-project.org/\cr


From noreply at r-forge.r-project.org  Sun May  3 20:04:21 2015
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Sun,  3 May 2015 20:04:21 +0200 (CEST)
Subject: [Robast-commits] r835 - in branches/robast-1.0/pkg/RobExtremes: .
	man
Message-ID: <20150503180421.9781F187CAE@r-forge.r-project.org>

Author: stamats
Date: 2015-05-03 20:04:21 +0200 (Sun, 03 May 2015)
New Revision: 835

Modified:
   branches/robast-1.0/pkg/RobExtremes/DESCRIPTION
   branches/robast-1.0/pkg/RobExtremes/man/0RobExtremes-package.Rd
Log:
update of package DESCRIPTION and Rd file

Modified: branches/robast-1.0/pkg/RobExtremes/DESCRIPTION
===================================================================
--- branches/robast-1.0/pkg/RobExtremes/DESCRIPTION	2015-05-03 17:50:33 UTC (rev 834)
+++ branches/robast-1.0/pkg/RobExtremes/DESCRIPTION	2015-05-03 18:04:21 UTC (rev 835)
@@ -1,6 +1,6 @@
 Package: RobExtremes
 Version: 1.0
-Date: 2013-09-11
+Date: 2015-05-03
 Title: Optimally Robust Estimation for Extreme Value Distributions
 Description: Optimally robust estimation for extreme value distributions using S4 classes and methods (based on
          packages distr, distrEx, distrMod, RobAStBase, and ROptEst).
@@ -12,7 +12,6 @@
 		person("Gerald", "Kroisandt", role="ctb", comment="contributed testing routines"), 
         person("Matthias", "Kohl", role=c("aut", "cph")), 
 		person("Peter", "Ruckdeschel", role=c("cre", "cph"), email="Peter.Ruckdeschel at itwm.fraunhofer.de"))
-LazyLoad: yes
 ByteCompile: yes
 License: LGPL-3
 Encoding: latin1

Modified: branches/robast-1.0/pkg/RobExtremes/man/0RobExtremes-package.Rd
===================================================================
--- branches/robast-1.0/pkg/RobExtremes/man/0RobExtremes-package.Rd	2015-05-03 17:50:33 UTC (rev 834)
+++ branches/robast-1.0/pkg/RobExtremes/man/0RobExtremes-package.Rd	2015-05-03 18:04:21 UTC (rev 835)
@@ -3,7 +3,7 @@
 \alias{RobExtremes}
 \docType{package}
 \title{
-RobExtremes -- optimally robust estimation for extreme value distributions
+RobExtremes -- Optimally Robust Estimation for Extreme Value Distributions
 }
 \description{
 \pkg{RobExtremes} provides infrastructure for optimally robust estimation
@@ -30,15 +30,11 @@
 \details{
 \tabular{ll}{
 Package: \tab RobExtremes \cr
-Version: \tab 0.9 \cr
-Date: \tab 2013-09-11 \cr
-Depends: \tab R (>= 2.14.0), methods, distr(>= 2.5), distrEx(>= 2.5), RandVar(>= 0.8), distrMod(>= 2.5),
-RobAStBase(>= 0.9), ROptEst(>= 0.9), robustbase(>= 0.8-0), evd, actuar \cr
-         \tab RandVar(>= 0.9), distrMod(>=2.5), RobAStBase(>=0.8-0),
-         ROptEst(>=0.9), \cr
-         \tab robustbase(>= 0.8-0), evd, actuar\cr
-Imports: \tab RobAStRDA \cr
-LazyLoad: \tab yes \cr
+Version: \tab 1.0 \cr
+Date: \tab 2015-05-03 \cr
+Depends: \tab R (>= 2.14.0), methods, distrMod(>= 2.5.2), ROptEst(>= 0.9), robustbase(>= 0.8-0), evd, actuar \cr
+Suggests: \tab RUnit (>= 0.4.26), ismev (>= 1.39)\cr
+Imports: \tab RobAStRDA, distr, distrEx, RandVar, RobAStBase, startupmsg \cr
 ByteCompile: \tab yes \cr
 License: \tab LGPL-3 \cr
 URL: \tab http://robast.r-forge.r-project.org/\cr