[Distr-commits] r1290 - in branches/distr-2.8/pkg/distr: R inst
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Sat Sep 15 09:41:52 CEST 2018
Author: ruckdeschel
Date: 2018-09-15 09:41:52 +0200 (Sat, 15 Sep 2018)
New Revision: 1290
Modified:
branches/distr-2.8/pkg/distr/R/AllInitialize.R
branches/distr-2.8/pkg/distr/inst/NEWS
Log:
[distr] branch 2.8: detected that the initialize method of Weibull lacked a .withArith argument to capture the scale structure
Modified: branches/distr-2.8/pkg/distr/R/AllInitialize.R
===================================================================
--- branches/distr-2.8/pkg/distr/R/AllInitialize.R 2018-08-18 23:23:21 UTC (rev 1289)
+++ branches/distr-2.8/pkg/distr/R/AllInitialize.R 2018-09-15 07:41:52 UTC (rev 1290)
@@ -1034,7 +1034,7 @@
## Class: Weibull distribution
setMethod("initialize", "Weibull",
- function(.Object, shape = 1, scale = 1) {
+ function(.Object, shape = 1, scale = 1, .withArith = FALSE) {
.Object at img <- new("Reals")
.Object at param <- new("WeibullParameter",
shape = shape, scale = scale
@@ -1062,7 +1062,7 @@
lower.tail = lower.tail, log.p = log.p) },
list(shapeSub = shape, scaleSub = scale)
)
- .Object at .withArith <- FALSE
+ .Object at .withArith <- .withArith
.Object
})
Modified: branches/distr-2.8/pkg/distr/inst/NEWS
===================================================================
--- branches/distr-2.8/pkg/distr/inst/NEWS 2018-08-18 23:23:21 UTC (rev 1289)
+++ branches/distr-2.8/pkg/distr/inst/NEWS 2018-09-15 07:41:52 UTC (rev 1290)
@@ -38,6 +38,8 @@
bug fixes
+ fixed a (newly introduced) bug in exp() for DiscreteDistribution -- forgot to return obj ...
+ Bernhard discovered a bug in devNew() -- it opened new devices even if option("newDevice"==FALSE)
++ detected that the initialize method of Weibull lacked a .withArith argument to capture the scale structure
+
##############
v 2.7
##############
More information about the Distr-commits
mailing list