[Distr-commits] r855 - in branches/distr-2.4/pkg/distrEllipse: . tests/Examples

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Fri Jan 11 07:58:10 CET 2013


Author: stamats
Date: 2013-01-11 07:58:10 +0100 (Fri, 11 Jan 2013)
New Revision: 855

Modified:
   branches/distr-2.4/pkg/distrEllipse/DESCRIPTION
   branches/distr-2.4/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save
Log:
update of Rout.save and date in DESCRIPTION file

Modified: branches/distr-2.4/pkg/distrEllipse/DESCRIPTION
===================================================================
--- branches/distr-2.4/pkg/distrEllipse/DESCRIPTION	2013-01-11 05:59:21 UTC (rev 854)
+++ branches/distr-2.4/pkg/distrEllipse/DESCRIPTION	2013-01-11 06:58:10 UTC (rev 855)
@@ -1,6 +1,6 @@
 Package: distrEllipse
 Version: 2.4
-Date: 2013-01-09
+Date: 2013-01-11
 Title: S4 classes for elliptically contoured distributions
 Depends: R(>= 2.8.0), methods, graphics, mvtnorm, setRNG(>= 2006.2-1), distr(>= 2.2), distrEx(>= 2.2), distrSim(>= 2.2), startupmsg
 Suggests: distrMod(>= 2.2), distrTEst(>= 2.2)

Modified: branches/distr-2.4/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save
===================================================================
--- branches/distr-2.4/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save	2013-01-11 05:59:21 UTC (rev 854)
+++ branches/distr-2.4/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save	2013-01-11 06:58:10 UTC (rev 855)
@@ -1,6 +1,6 @@
 
-R version 2.15.0 Patched (2012-05-26 r59450) -- "Easter Beagle"
-Copyright (C) 2012 The R Foundation for Statistical Computing
+R Under development (unstable) (2013-01-09 r61595) -- "Unsuffered Consequences"
+Copyright (C) 2013 The R Foundation for Statistical Computing
 ISBN 3-900051-07-0
 Platform: x86_64-unknown-linux-gnu (64-bit)
 
@@ -36,6 +36,13 @@
 :SweaveListingUtils>  Utilities for Sweave together with
 :SweaveListingUtils>  TeX listings package (version 0.6)
 :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().
@@ -55,7 +62,7 @@
 
 Attaching package: ‘SweaveListingUtils’
 
-The following object(s) are masked from ‘package:base’:
+The following object is masked from ‘package:base’:
 
     library, require
 
@@ -81,7 +88,7 @@
 
 Attaching package: ‘distr’
 
-The following object(s) are masked from ‘package:stats’:
+The following object is masked from ‘package:stats’:
 
     df, qqplot, sd
 
@@ -105,7 +112,7 @@
 
 Attaching package: ‘distrEx’
 
-The following object(s) are masked from ‘package:stats’:
+The following object is masked from ‘package:stats’:
 
     IQR, mad, median, var
 
@@ -127,11 +134,11 @@
 
 Attaching package: ‘distrSim’
 
-The following object(s) are masked from ‘package:stats’:
+The following object is masked from ‘package:stats’:
 
     simulate
 
-The following object(s) are masked from ‘package:base’:
+The following object is masked from ‘package:base’:
 
     rbind
 
@@ -152,12 +159,23 @@
 
 > 
 > assign(".oldSearch", search(), pos = 'CheckExEnv')
+> assign(".ExTimings", "distrEllipse-Ex.timings", pos = 'CheckExEnv')
+> cat("name\tuser\tsystem\telapsed\n", file=get(".ExTimings", pos = 'CheckExEnv'))
+> 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("EllipticalDistribution-class")
 > ### * EllipticalDistribution-class
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EllipticalDistribution-class
 > ### Title: Elliptical distribution class
 > ### Aliases: EllipticalDistribution-class
@@ -189,12 +207,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("EllipticalDistribution-class", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("EllipticalDistribution")
 > ### * EllipticalDistribution
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EllipticalDistribution
 > ### Title: Generating function for EllipticalDistribution-class
 > ### Aliases: EllipticalDistribution
@@ -215,12 +237,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("EllipticalDistribution", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("EllipticalParameter-class")
 > ### * EllipticalParameter-class
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EllipticalParameter-class
 > ### Title: Paramter of an Elliptical distributions
 > ### Aliases: EllipticalParameter-class location
@@ -248,12 +274,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("EllipticalParameter-class", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVnormDistribution-class")
 > ### * MVnormDistribution-class
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVNormDistribution-class
 > ### Title: MVNorm distribution class
 > ### Aliases: MVNormDistribution-class sigma,MVNormDistribution-method
@@ -275,12 +305,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("MVnormDistribution-class", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVnormDistribution")
 > ### * MVnormDistribution
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVNormDistribution
 > ### Title: Generating function for MVNormDistribution-class
 > ### Aliases: MVNormDistribution MVNorm
@@ -301,12 +335,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("MVnormDistribution", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVnormParameter-class")
 > ### * MVnormParameter-class
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVNormParameter-class
 > ### Title: Paramter of a multivariate normal distribution
 > ### Aliases: MVNormParameter-class mean mean,MVNormParameter-method sigma
@@ -331,12 +369,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("MVnormParameter-class", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVtDistribution-class")
 > ### * MVtDistribution-class
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVtDistribution-class
 > ### Title: MVt distribution class
 > ### Aliases: MVtDistribution-class sigma,MVtDistribution-method
@@ -360,12 +402,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("MVtDistribution-class", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVtDistribution")
 > ### * MVtDistribution
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVtDistribution
 > ### Title: Generating function for MvtDistribution-class
 > ### Aliases: MVtDistribution MVt
@@ -393,12 +439,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("MVtDistribution", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVtParameter-class")
 > ### * MVtParameter-class
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVtParameter-class
 > ### Title: Paramter of a multivariate t distribution
 > ### Aliases: MVtParameter-class sigma,MVtParameter-method
@@ -429,12 +479,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("MVtParameter-class", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MultivarDistrList-class")
 > ### * MultivarDistrList-class
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MultivarDistrList-class
 > ### Title: List of multivariate distributions
 > ### Aliases: MultivarDistrList-class MVDistrList-class
@@ -494,12 +548,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("MultivarDistrList-class", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MultivarDistrList")
 > ### * MultivarDistrList
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MultivarDistrList
 > ### Title: Generating function for MultivarDistrList-class
 > ### Aliases: MultivarDistrList
@@ -556,12 +614,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("MultivarDistrList", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MultivarMixingDistribution-class")
 > ### * MultivarMixingDistribution-class
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MultivarMixingDistribution-class
 > ### Title: Class "MultivarMixingDistribution"
 > ### Aliases: MultivarMixingDistribution-class mixCoeff mixDistr mixCoeff<-
@@ -927,12 +989,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("MultivarMixingDistribution-class", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MultivarMixingDistribution")
 > ### * MultivarMixingDistribution
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MultivarMixingDistribution
 > ### Title: Generating function for Class "MultivarMixingDistribution"
 > ### Aliases: MultivarMixingDistribution
@@ -961,12 +1027,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("MultivarMixingDistribution", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("SphericalDistribution-class")
 > ### * SphericalDistribution-class
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: SphericalDistribution-class
 > ### Title: Spherical distribution class
 > ### Aliases: SphericalDistribution-class scale,SphericalDistribution-method
@@ -1004,12 +1074,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("SphericalDistribution-class", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("SphericalDistribution")
 > ### * SphericalDistribution
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: SphericalDistribution
 > ### Title: Generating function for SphericalDistribution-class
 > ### Aliases: SphericalDistribution
@@ -1030,12 +1104,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("SphericalDistribution", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("distrEllipseMASK")
 > ### * distrEllipseMASK
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: distrEllipseMASK
 > ### Title: Masking of/by other functions in package "distrEllipse"
 > ### Aliases: distrEllipseMASK MASKING
@@ -1056,12 +1134,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("distrEllipseMASK", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("distrEllipseoptions")
 > ### * distrEllipseoptions
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: distrEllipseoptions
 > ### Title: functions to change the global variables of the package
 > ###   'distrEllipse'
@@ -1093,12 +1175,16 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("distrEllipseoptions", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("plot-methods")
 > ### * plot-methods
 > 
 > flush(stderr()); flush(stdout())
 > 
+> assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: plot-methods
 > ### Title: Methods for Function plot in Package 'distrEllipse'
 > ### Aliases: plot plot-methods plot,SphericalDistribution,missing-method
@@ -1156,10 +1242,13 @@
 > 
 > 
 > 
+> 
+> assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
+> cat("plot-methods", get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > ### * <FOOTER>
 > ###
 > cat("Time elapsed: ", proc.time() - get("ptime", pos = 'CheckExEnv'),"\n")
-Time elapsed:  10.244 0.148 10.446 0.004 0.004 
+Time elapsed:  11.604 0.108 11.77 0 0 
 > grDevices::dev.off()
 null device 
           1 



More information about the Distr-commits mailing list