[Distr-commits] r1461 - in branches/distr-2.9/pkg/distrEllipse: inst man tests/Examples

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Thu Aug 29 18:32:08 CEST 2024


Author: ruckdeschel
Date: 2024-08-29 18:32:08 +0200 (Thu, 29 Aug 2024)
New Revision: 1461

Modified:
   branches/distr-2.9/pkg/distrEllipse/inst/NEWS
   branches/distr-2.9/pkg/distrEllipse/man/0distrEllipse-package.Rd
   branches/distr-2.9/pkg/distrEllipse/man/distrEllipseMASK.Rd
   branches/distr-2.9/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save
Log:
[distrEllipse] ported changes from trunk to devel branch distr-2.9

Modified: branches/distr-2.9/pkg/distrEllipse/inst/NEWS
===================================================================
--- branches/distr-2.9/pkg/distrEllipse/inst/NEWS	2024-08-29 16:29:14 UTC (rev 1460)
+++ branches/distr-2.9/pkg/distrEllipse/inst/NEWS	2024-08-29 16:32:08 UTC (rev 1461)
@@ -18,6 +18,16 @@
 
 
 ##############
+v 2.8.3
+##############
+
+under the hood:
+with the help of K. Hornik identified spurious, platform dependent LF/CR issue
+and capsulated calls to infoShow() in Rd files by 
+## IGNORE_RDIFF_BEGIN
+## IGNORE_RDIFF_END
+
+##############
 v 2.8
 ##############
 

Modified: branches/distr-2.9/pkg/distrEllipse/man/0distrEllipse-package.Rd
===================================================================
--- branches/distr-2.9/pkg/distrEllipse/man/0distrEllipse-package.Rd	2024-08-29 16:29:14 UTC (rev 1460)
+++ branches/distr-2.9/pkg/distrEllipse/man/0distrEllipse-package.Rd	2024-08-29 16:32:08 UTC (rev 1461)
@@ -13,7 +13,7 @@
 \tabular{ll}{
 Package: \tab distrEllipse \cr
 Version: \tab 2.9.0 \cr
-Date: \tab 2019-03-13 \cr
+Date: \tab 2024-08-29 \cr
 Depends: \tab R(>= 3.4), methods, graphics, mvtnorm, setRNG(>= 2006.2-1),
     distr(>= 2.8.0),distrEx(>= 2.8.0), distrSim(>= 2.2) \cr
 Suggests: \tab distrMod(>= 2.8.0), distrTEst(>= 2.2) \cr
@@ -21,7 +21,7 @@
 ByteCompile: \tab yes \cr
 License: \tab LGPL-3 \cr
 URL: \tab https://r-forge.r-project.org/projects/distr/\cr
-VCS/SVNRevision: \tab 1324 \cr
+VCS/SVNRevision: \tab 1454 \cr
 }
 }
 \section{Classes}{

Modified: branches/distr-2.9/pkg/distrEllipse/man/distrEllipseMASK.Rd
===================================================================
--- branches/distr-2.9/pkg/distrEllipse/man/distrEllipseMASK.Rd	2024-08-29 16:29:14 UTC (rev 1460)
+++ branches/distr-2.9/pkg/distrEllipse/man/distrEllipseMASK.Rd	2024-08-29 16:32:08 UTC (rev 1461)
@@ -18,7 +18,9 @@
 
 \author{Peter Ruckdeschel \email{peter.ruckdeschel at uni-oldenburg.de}}
 \examples{
+## IGNORE_RDIFF_BEGIN
 distrEllipseMASK()
+## IGNORE_RDIFF_END
 }
 \keyword{programming}
 \keyword{distribution}

Modified: branches/distr-2.9/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save
===================================================================
--- branches/distr-2.9/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save	2024-08-29 16:29:14 UTC (rev 1460)
+++ branches/distr-2.9/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save	2024-08-29 16:32:08 UTC (rev 1461)
@@ -1,7 +1,7 @@
 
-R version 3.5.1 RC (2018-06-24 r74935) -- "Feather Spray"
-Copyright (C) 2018 The R Foundation for Statistical Computing
-Platform: i386-w64-mingw32/i386 (32-bit)
+R Under development (unstable) (2024-08-17 r87027 ucrt) -- "Unsuffered Consequences"
+Copyright (C) 2024 The R Foundation for Statistical Computing
+Platform: x86_64-w64-mingw32/x64
 
 R is free software and comes with ABSOLUTELY NO WARRANTY.
 You are welcome to redistribute it under certain conditions.
@@ -21,24 +21,12 @@
 > source(file.path(R.home("share"), "R", "examples-header.R"))
 > options(warn = 1)
 > options(pager = "console")
-> base::assign(".ExTimings", "distrEllipse-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('distrEllipse')
 Loading required package: mvtnorm
 Loading required package: setRNG
 Loading required package: distr
 Loading required package: startupmsg
-:startupmsg>  Utilities for Start-Up Messages (version 0.9.5)
+:startupmsg>  Utilities for Start-Up Messages (version 0.9.7)
 :startupmsg> 
 :startupmsg>  For more information see ?"startupmsg",
 :startupmsg>  NEWS("startupmsg")
@@ -45,7 +33,7 @@
 
 Loading required package: sfsmisc
 :distr>  Object Oriented Implementation of Distributions (version
-:distr>  2.8.0)
+:distr>  2.9.4)
 :distr> 
 :distr>  Attention: Arithmetics on distribution objects are
 :distr>  understood as operations on corresponding random variables
@@ -71,7 +59,7 @@
     df, qqplot, sd
 
 Loading required package: distrEx
-:distrEx>  Extensions of Package 'distr' (version 2.7.0)
+:distrEx>  Extensions of Package 'distr' (version 2.9.2)
 :distrEx> 
 :distrEx>  Note: Packages "e1071", "moments", "fBasics" should be
 :distrEx>  attached /before/ package "distrEx". See
@@ -96,7 +84,7 @@
 
 Loading required package: distrSim
 :distrSim>  Simulation Classes Based on Package 'distr' (version
-:distrSim>  2.7.0)
+:distrSim>  2.8.2)
 :distrSim> 
 :distrSim>  Some functions from package 'stats' are intentionally
 :distrSim>  masked ---see distrSimMASK().
@@ -121,7 +109,7 @@
     rbind
 
 :distrEllipse>  S4 Classes for Elliptically Contoured
-:distrEllipse>  Distributions (version 2.7.0)
+:distrEllipse>  Distributions (version 2.8.1)
 :distrEllipse> 
 :distrEllipse>  Some functions from package 'stats' are
 :distrEllipse>  intentionally masked ---see
@@ -144,7 +132,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EllipticalDistribution-class
 > ### Title: Elliptical distribution class
 > ### Aliases: EllipticalDistribution-class
@@ -177,8 +164,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EllipticalDistribution-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("EllipticalDistribution")
 > ### * EllipticalDistribution
@@ -185,7 +170,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EllipticalDistribution
 > ### Title: Generating function for EllipticalDistribution-class
 > ### Aliases: EllipticalDistribution
@@ -206,8 +190,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EllipticalDistribution", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("EllipticalParameter-class")
 > ### * EllipticalParameter-class
@@ -214,7 +196,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: EllipticalParameter-class
 > ### Title: Paramter of an Elliptical distributions
 > ### Aliases: EllipticalParameter-class location
@@ -242,8 +223,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EllipticalParameter-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVnormDistribution-class")
 > ### * MVnormDistribution-class
@@ -250,7 +229,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVNormDistribution-class
 > ### Title: MVNorm distribution class
 > ### Aliases: MVNormDistribution-class sigma,MVNormDistribution-method
@@ -272,8 +250,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVnormDistribution-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVnormDistribution")
 > ### * MVnormDistribution
@@ -280,7 +256,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVNormDistribution
 > ### Title: Generating function for MVNormDistribution-class
 > ### Aliases: MVNormDistribution MVNorm
@@ -301,8 +276,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVnormDistribution", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVnormParameter-class")
 > ### * MVnormParameter-class
@@ -309,7 +282,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVNormParameter-class
 > ### Title: Paramter of a multivariate normal distribution
 > ### Aliases: MVNormParameter-class mean mean,MVNormParameter-method sigma
@@ -334,8 +306,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVnormParameter-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVtDistribution-class")
 > ### * MVtDistribution-class
@@ -342,7 +312,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVtDistribution-class
 > ### Title: MVt distribution class
 > ### Aliases: MVtDistribution-class sigma,MVtDistribution-method
@@ -366,8 +335,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVtDistribution-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVtDistribution")
 > ### * MVtDistribution
@@ -374,7 +341,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVtDistribution
 > ### Title: Generating function for MvtDistribution-class
 > ### Aliases: MVtDistribution MVt
@@ -402,8 +368,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVtDistribution", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MVtParameter-class")
 > ### * MVtParameter-class
@@ -410,7 +374,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MVtParameter-class
 > ### Title: Paramter of a multivariate t distribution
 > ### Aliases: MVtParameter-class sigma,MVtParameter-method
@@ -441,8 +404,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVtParameter-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MultivarDistrList-class")
 > ### * MultivarDistrList-class
@@ -449,7 +410,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MultivarDistrList-class
 > ### Title: List of multivariate distributions
 > ### Aliases: MultivarDistrList-class MVDistrList-class
@@ -508,8 +468,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MultivarDistrList-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MultivarDistrList")
 > ### * MultivarDistrList
@@ -516,7 +474,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MultivarDistrList
 > ### Title: Generating function for MultivarDistrList-class
 > ### Aliases: MultivarDistrList
@@ -573,8 +530,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MultivarDistrList", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MultivarMixingDistribution-class")
 > ### * MultivarMixingDistribution-class
@@ -581,7 +536,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MultivarMixingDistribution-class
 > ### Title: Class "MultivarMixingDistribution"
 > ### Aliases: MultivarMixingDistribution-class mixCoeff mixDistr mixCoeff<-
@@ -621,7 +575,7 @@
     Its absolutely continuous part (with weight 0.385000) is a
  Distribution Object of Class: AbscontDistribution
  This part is accessible with 'acPart(<obj>)'.
-Warning in new("standardGeneric", .Data = function (object)  :
+Warning in (new("standardGeneric", .Data = function (object)  :
   arithmetics on distributions are understood as operations on r.v.'s
 see 'distrARITH()'; for switching off this warning see '?distroptions'
 > p(mylist)(0.3)          
@@ -630,7 +584,7 @@
 An object of class "UnivarDistrList"
  [[1]] Distribution Object of Class: AbscontDistribution
  [[2]] Distribution Object of Class: DiscreteDistribution
-Warning in new("standardGeneric", .Data = function (object)  :
+Warning in (new("standardGeneric", .Data = function (object)  :
   arithmetics on distributions are understood as operations on r.v.'s
 see 'distrARITH()'; for switching off this warning see '?distroptions'
 > E(mylist)
@@ -768,13 +722,11 @@
 Warning in log(x) : NaNs produced
 Warning in log(x) : NaNs produced
           [,1]     [,2]
-[1,]  9.556681 -0.68320
+[1,]  9.556678 -0.68320
 [2,] -0.683200 12.31188
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MultivarMixingDistribution-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("MultivarMixingDistribution")
 > ### * MultivarMixingDistribution
@@ -781,7 +733,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: MultivarMixingDistribution
 > ### Title: Generating function for Class "MultivarMixingDistribution"
 > ### Aliases: MultivarMixingDistribution
@@ -794,8 +745,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MultivarMixingDistribution", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("SphericalDistribution-class")
 > ### * SphericalDistribution-class
@@ -802,7 +751,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: SphericalDistribution-class
 > ### Title: Spherical distribution class
 > ### Aliases: SphericalDistribution-class scale,SphericalDistribution-method
@@ -839,8 +787,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("SphericalDistribution-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("SphericalDistribution")
 > ### * SphericalDistribution
@@ -847,7 +793,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: SphericalDistribution
 > ### Title: Generating function for SphericalDistribution-class
 > ### Aliases: SphericalDistribution
@@ -868,8 +813,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("SphericalDistribution", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("distrEllipseMASK")
 > ### * distrEllipseMASK
@@ -876,7 +819,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: distrEllipseMASK
 > ### Title: Masking of/by other functions in package "distrEllipse"
 > ### Aliases: distrEllipseMASK MASKING
@@ -884,6 +826,7 @@
 > 
 > ### ** Examples
 > 
+> ## IGNORE_RDIFF_BEGIN
 > distrEllipseMASK()
 ######################################################################
 #  On masking of and by other functions in package "distrEllipse"       
@@ -893,11 +836,10 @@
 
 *** intentional masking: ***
 
+> ## IGNORE_RDIFF_END
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("distrEllipseMASK", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("distrEllipseoptions")
 > ### * distrEllipseoptions
@@ -904,7 +846,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
 > ### Name: distrEllipseoptions
 > ### Title: functions to change the global variables of the package
 > ###   'distrEllipse'
@@ -936,8 +877,6 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("distrEllipseoptions", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > cleanEx()
 > nameEx("plot-methods")
 > ### * plot-methods
@@ -944,7 +883,6 @@
 > 
 > flush(stderr()); flush(stdout())
 > 
-> base::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
@@ -962,14 +900,12 @@
 > 
 > 
 > 
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("plot-methods", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
 > ### * <FOOTER>
 > ###
 > cleanEx()
 > options(digits = 7L)
 > base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
-Time elapsed:  6.74 0.31 7.07 NA NA 
+Time elapsed:  7.63 0.33 8.46 NA NA 
 > grDevices::dev.off()
 null device 
           1 



More information about the Distr-commits mailing list