[Robast-commits] r445 - pkg/ROptRegTS/tests/Examples
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Wed Jan 5 20:16:31 CET 2011
Author: stamats
Date: 2011-01-05 20:16:31 +0100 (Wed, 05 Jan 2011)
New Revision: 445
Modified:
pkg/ROptRegTS/tests/Examples/ROptRegTS-Ex.Rout.save
Log:
updated ROptRegTS-Ex.Rout.save files to R 2.12.1 patched
Modified: pkg/ROptRegTS/tests/Examples/ROptRegTS-Ex.Rout.save
===================================================================
--- pkg/ROptRegTS/tests/Examples/ROptRegTS-Ex.Rout.save 2011-01-05 19:09:20 UTC (rev 444)
+++ pkg/ROptRegTS/tests/Examples/ROptRegTS-Ex.Rout.save 2011-01-05 19:16:31 UTC (rev 445)
@@ -1,7 +1,8 @@
-R version 2.10.0 beta (2009-10-15 r50107)
-Copyright (C) 2009 The R Foundation for Statistical Computing
+R version 2.12.1 Patched (2011-01-04 r53913)
+Copyright (C) 2011 The R Foundation for Statistical Computing
ISBN 3-900051-07-0
+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,78 +18,13 @@
'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("ROptRegTS-Ex.ps")
->
-> assign("par.postscript", graphics::par(no.readonly = TRUE), pos = "CheckExEnv")
-> options(contrasts = c(unordered = "contr.treatment", ordered = "contr.poly"))
+> pkgname <- "ROptRegTS"
+> source(file.path(R.home("share"), "R", "examples-header.R"))
> options(warn = 1)
> library('ROptRegTS')
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.7.1)
:startupmsg>
:startupmsg> For more information see ?"startupmsg",
:startupmsg> NEWS("startupmsg")
@@ -96,7 +32,7 @@
Loading required package: sfsmisc
Loading required package: SweaveListingUtils
:SweaveListingUtils> Utilities for Sweave together with
-:SweaveListingUtils> TeX listings package (version 0.4)
+:SweaveListingUtils> TeX listings package (version 0.5)
:SweaveListingUtils>
:SweaveListingUtils> Some functions from package 'base'
:SweaveListingUtils> are intentionally masked ---see
@@ -117,14 +53,12 @@
Attaching package: 'SweaveListingUtils'
+The following object(s) 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.3)
:distr>
:distr> Attention: Arithmetics on distribution objects are
:distr> understood as operations on corresponding random variables
@@ -145,25 +79,21 @@
Attaching package: 'distr'
+The following object(s) 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':
- The following object(s) are masked from package:grDevices :
+ cm
- cm
-
-:distrEx> Extensions of package distr (version 2.2)
+:distrEx> Extensions of package distr (version 2.3)
:distrEx>
:distrEx> Note: Packages "e1071", "moments", "fBasics" should be
:distrEx> attached /before/ package "distrEx". See distrExMASK().
@@ -178,16 +108,12 @@
Attaching package: 'distrEx'
+The following object(s) 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 0.8)
:RandVar>
:RandVar> For more information see ?"RandVar", NEWS("RandVar"), as
:RandVar> well as
@@ -199,15 +125,14 @@
Attaching package: 'ROptEstOld'
+The following object(s) are 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("Av1CondContIC-class")
+> cleanEx()
+> nameEx("Av1CondContIC-class")
> ### * Av1CondContIC-class
>
> flush(stderr()); flush(stdout())
@@ -255,7 +180,8 @@
>
>
>
-> cleanEx(); nameEx("Av1CondContIC")
+> cleanEx()
+> nameEx("Av1CondContIC")
> ### * Av1CondContIC
>
> flush(stderr()); flush(stdout())
@@ -295,7 +221,8 @@
>
>
>
-> cleanEx(); nameEx("Av1CondContNeighborhood-class")
+> cleanEx()
+> nameEx("Av1CondContNeighborhood-class")
> ### * Av1CondContNeighborhood-class
>
> flush(stderr()); flush(stdout())
@@ -314,7 +241,8 @@
>
>
>
-> cleanEx(); nameEx("Av1CondContNeighborhood")
+> cleanEx()
+> nameEx("Av1CondContNeighborhood")
> ### * Av1CondContNeighborhood
>
> flush(stderr()); flush(stdout())
@@ -344,7 +272,8 @@
>
>
>
-> cleanEx(); nameEx("Av1CondTotalVarIC-class")
+> cleanEx()
+> nameEx("Av1CondTotalVarIC-class")
> ### * Av1CondTotalVarIC-class
>
> flush(stderr()); flush(stdout())
@@ -392,7 +321,8 @@
>
>
>
-> cleanEx(); nameEx("Av1CondTotalVarIC")
+> cleanEx()
+> nameEx("Av1CondTotalVarIC")
> ### * Av1CondTotalVarIC
>
> flush(stderr()); flush(stdout())
@@ -431,7 +361,8 @@
>
>
>
-> cleanEx(); nameEx("Av1CondTotalVarNeighborhood-class")
+> cleanEx()
+> nameEx("Av1CondTotalVarNeighborhood-class")
> ### * Av1CondTotalVarNeighborhood-class
>
> flush(stderr()); flush(stdout())
@@ -450,7 +381,8 @@
>
>
>
-> cleanEx(); nameEx("Av1CondTotalVarNeighborhood")
+> cleanEx()
+> nameEx("Av1CondTotalVarNeighborhood")
> ### * Av1CondTotalVarNeighborhood
>
> flush(stderr()); flush(stdout())
@@ -480,7 +412,8 @@
>
>
>
-> cleanEx(); nameEx("Av2CondContIC-class")
+> cleanEx()
+> nameEx("Av2CondContIC-class")
> ### * Av2CondContIC-class
>
> flush(stderr()); flush(stdout())
@@ -522,7 +455,8 @@
>
>
>
-> cleanEx(); nameEx("Av2CondContIC")
+> cleanEx()
+> nameEx("Av2CondContIC")
> ### * Av2CondContIC
>
> flush(stderr()); flush(stdout())
@@ -556,7 +490,8 @@
>
>
>
-> cleanEx(); nameEx("Av2CondContNeighborhood-class")
+> cleanEx()
+> nameEx("Av2CondContNeighborhood-class")
> ### * Av2CondContNeighborhood-class
>
> flush(stderr()); flush(stdout())
@@ -575,7 +510,8 @@
>
>
>
-> cleanEx(); nameEx("Av2CondContNeighborhood")
+> cleanEx()
+> nameEx("Av2CondContNeighborhood")
> ### * Av2CondContNeighborhood
>
> flush(stderr()); flush(stdout())
@@ -605,7 +541,8 @@
>
>
>
-> cleanEx(); nameEx("CondContIC-class")
+> cleanEx()
+> nameEx("CondContIC-class")
> ### * CondContIC-class
>
> flush(stderr()); flush(stdout())
@@ -657,7 +594,8 @@
>
>
>
-> cleanEx(); nameEx("CondContIC")
+> cleanEx()
+> nameEx("CondContIC")
> ### * CondContIC
>
> flush(stderr()); flush(stdout())
@@ -700,7 +638,8 @@
>
>
>
-> cleanEx(); nameEx("CondContNeighborhood-class")
+> cleanEx()
+> nameEx("CondContNeighborhood-class")
> ### * CondContNeighborhood-class
>
> flush(stderr()); flush(stdout())
@@ -719,7 +658,8 @@
>
>
>
-> cleanEx(); nameEx("CondContNeighborhood")
+> cleanEx()
+> nameEx("CondContNeighborhood")
> ### * CondContNeighborhood
>
> flush(stderr()); flush(stdout())
@@ -749,7 +689,8 @@
>
>
>
-> cleanEx(); nameEx("CondIC-class")
+> cleanEx()
+> nameEx("CondIC-class")
> ### * CondIC-class
>
> flush(stderr()); flush(stdout())
@@ -779,7 +720,8 @@
>
>
>
-> cleanEx(); nameEx("CondIC")
+> cleanEx()
+> nameEx("CondIC")
> ### * CondIC
>
> flush(stderr()); flush(stdout())
@@ -836,7 +778,8 @@
>
>
>
-> cleanEx(); nameEx("CondTotalVarIC-class")
+> cleanEx()
+> nameEx("CondTotalVarIC-class")
> ### * CondTotalVarIC-class
>
> flush(stderr()); flush(stdout())
@@ -888,7 +831,8 @@
>
>
>
-> cleanEx(); nameEx("CondTotalVarIC")
+> cleanEx()
+> nameEx("CondTotalVarIC")
> ### * CondTotalVarIC
>
> flush(stderr()); flush(stdout())
@@ -930,7 +874,8 @@
>
>
>
-> cleanEx(); nameEx("CondTotalVarNeighborhood-class")
+> cleanEx()
+> nameEx("CondTotalVarNeighborhood-class")
> ### * CondTotalVarNeighborhood-class
>
> flush(stderr()); flush(stdout())
@@ -949,7 +894,8 @@
>
>
>
-> cleanEx(); nameEx("CondTotalVarNeighborhood")
+> cleanEx()
+> nameEx("CondTotalVarNeighborhood")
> ### * CondTotalVarNeighborhood
>
> flush(stderr()); flush(stdout())
@@ -979,7 +925,8 @@
>
>
>
-> cleanEx(); nameEx("FixRobRegTypeModel-class")
+> cleanEx()
+> nameEx("FixRobRegTypeModel-class")
> ### * FixRobRegTypeModel-class
>
> flush(stderr()); flush(stdout())
@@ -1015,7 +962,8 @@
>
>
>
-> cleanEx(); nameEx("FixRobRegTypeModel")
+> cleanEx()
+> nameEx("FixRobRegTypeModel")
> ### * FixRobRegTypeModel
>
> flush(stderr()); flush(stdout())
@@ -1059,7 +1007,8 @@
>
>
>
-> cleanEx(); nameEx("InfRobRegTypeModel-class")
+> cleanEx()
+> nameEx("InfRobRegTypeModel-class")
> ### * InfRobRegTypeModel-class
>
> flush(stderr()); flush(stdout())
@@ -1095,7 +1044,8 @@
>
>
>
-> cleanEx(); nameEx("InfRobRegTypeModel")
+> cleanEx()
+> nameEx("InfRobRegTypeModel")
> ### * InfRobRegTypeModel
>
> flush(stderr()); flush(stdout())
@@ -1139,7 +1089,8 @@
>
>
>
-> cleanEx(); nameEx("L2RegTypeFamily-class")
+> cleanEx()
+> nameEx("L2RegTypeFamily-class")
> ### * L2RegTypeFamily-class
>
> flush(stderr()); flush(stdout())
@@ -1180,7 +1131,8 @@
>
>
>
-> cleanEx(); nameEx("L2RegTypeFamily")
+> cleanEx()
+> nameEx("L2RegTypeFamily")
> ### * L2RegTypeFamily
>
> flush(stderr()); flush(stdout())
@@ -1210,7 +1162,8 @@
>
>
>
-> cleanEx(); nameEx("NormLinRegFamily")
+> cleanEx()
+> nameEx("NormLinRegFamily")
> ### * NormLinRegFamily
>
> flush(stderr()); flush(stdout())
@@ -1248,10 +1201,10 @@
{
as.vector(x[1:1L] * (x[1L + 1] - x[1:1L] %*% 0))
}
-<environment: 0x7659740>
+<environment: 0x7b35fc8>
> FisherInfo(LM1)
-An object of class “PosDefSymmMatrix”
+An object of class "PosDefSymmMatrix"
[,1]
[1,] 1
> checkL2deriv(LM1)
@@ -1264,7 +1217,8 @@
>
>
>
-> cleanEx(); nameEx("NormLinRegInterceptFamily")
+> cleanEx()
+> nameEx("NormLinRegInterceptFamily")
> ### * NormLinRegInterceptFamily
>
> flush(stderr()); flush(stdout())
@@ -1303,10 +1257,10 @@
{
as.vector(x[1:1L] * (x[1L + 1] - x[1:1L] %*% 0 - 0))
}
-<environment: 0x8955730>
+<environment: 0x5e29468>
> FisherInfo(LM1)
-An object of class “PosDefSymmMatrix”
+An object of class "PosDefSymmMatrix"
[,1] [,2]
[1,] 1 0
[2,] 0 1
@@ -1321,7 +1275,8 @@
>
>
>
-> cleanEx(); nameEx("NormLinRegScaleFamily")
+> cleanEx()
+> nameEx("NormLinRegScaleFamily")
> ### * NormLinRegScaleFamily
>
> flush(stderr()); flush(stdout())
@@ -1360,10 +1315,10 @@
{
as.vector(x[1:1L] * (x[1L + 1] - x[1:1L] %*% 0)/1^2)
}
-<environment: 0x82c23c0>
+<environment: 0x5e6f150>
> FisherInfo(LM1)
-An object of class “PosDefSymmMatrix”
+An object of class "PosDefSymmMatrix"
[,1] [,2]
[1,] 1 0
[2,] 0 2
@@ -1378,7 +1333,8 @@
>
>
>
-> cleanEx(); nameEx("RegTypeFamily-class")
+> cleanEx()
+> nameEx("RegTypeFamily-class")
> ### * RegTypeFamily-class
>
> flush(stderr()); flush(stdout())
@@ -1412,7 +1368,8 @@
>
>
>
-> cleanEx(); nameEx("RegTypeFamily")
+> cleanEx()
+> nameEx("RegTypeFamily")
> ### * RegTypeFamily
>
> flush(stderr()); flush(stdout())
@@ -1445,7 +1402,7 @@
> ### * <FOOTER>
> ###
> cat("Time elapsed: ", proc.time() - get("ptime", pos = 'CheckExEnv'),"\n")
-Time elapsed: 25.401 0.148 26.231 0 0
+Time elapsed: 19.17 0.06 19.312 0 0
> grDevices::dev.off()
null device
1
More information about the Robast-commits
mailing list