[Robast-commits] r811 - branches/robast-1.0/pkg/RobAStBase/tests/Examples
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Sun May 3 11:15:00 CEST 2015
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
More information about the Robast-commits
mailing list