CRAN Package Check Results for Package Ecfun

Last updated on 2024-03-28 23:01:43 CET.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 0.3-2 21.51 184.82 206.33 NOTE
r-devel-linux-x86_64-debian-gcc 0.3-2 13.75 132.41 146.16 NOTE
r-devel-linux-x86_64-fedora-clang 0.3-2 252.39 NOTE
r-devel-linux-x86_64-fedora-gcc 0.3-2 273.11 NOTE
r-devel-windows-x86_64 0.3-2 17.00 160.00 177.00 NOTE
r-patched-linux-x86_64 0.3-2 15.15 175.60 190.75 NOTE
r-release-linux-x86_64 0.3-2 15.87 175.05 190.92 OK
r-release-macos-arm64 0.3-2 72.00 ERROR
r-release-macos-x86_64 0.3-2 142.00 ERROR
r-release-windows-x86_64 0.3-2 21.00 204.00 225.00 OK
r-oldrel-macos-arm64 0.3-2 68.00 OK
r-oldrel-windows-x86_64 0.3-2 23.00 201.00 224.00 OK

Check Details

Version: 0.3-2
Check: Rd files
Result: NOTE checkRd: (-1) BoxCox.Rd:266-269: Lost braces in \itemize; \value handles \item{}{} directly checkRd: (-1) BoxCox.Rd:270-275: Lost braces in \itemize; \value handles \item{}{} directly checkRd: (-1) BoxCox.Rd:276-284: Lost braces in \itemize; \value handles \item{}{} directly checkRd: (-1) BoxCox.Rd:285-293: Lost braces in \itemize; \value handles \item{}{} directly checkRd: (-1) Newdata.Rd:88-91: Lost braces 88 | {replace \code{newDat[, x2]}: | ^ checkRd: (-1) interpPairs.Rd:120: Lost braces 120 | environment / list to use with code{object}, | ^ checkRd: (-1) matchQuote.Rd:72-74: Lost braces in \itemize; \value handles \item{}{} directly checkRd: (-1) matchQuote.Rd:75-80: Lost braces in \itemize; \value handles \item{}{} directly checkRd: (-1) matchQuote.Rd:81-88: Lost braces in \itemize; \value handles \item{}{} directly checkRd: (-1) matchQuote.Rd:89-94: Lost braces in \itemize; \value handles \item{}{} directly checkRd: (-1) simulate.bic.glm.Rd:81-91: Lost braces in \itemize; meant \describe ? checkRd: (-1) simulate.bic.glm.Rd:92-103: Lost braces in \itemize; meant \describe ? checkRd: (-1) simulate.bic.glm.Rd:104-108: Lost braces in \itemize; meant \describe ? checkRd: (-1) simulate.glm.Rd:79-83: Lost braces in \itemize; meant \describe ? checkRd: (-1) simulate.glm.Rd:84-95: Lost braces in \itemize; meant \describe ? checkRd: (-1) simulate.glm.Rd:96-100: Lost braces in \itemize; meant \describe ? Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-x86_64, r-patched-linux-x86_64

Version: 0.3-2
Check: examples
Result: ERROR Running examples in ‘Ecfun-Ex.R’ failed The error most likely occurred in: > ### Name: asNumericDF > ### Title: Coerce to numeric dropping commas and info after a blank > ### Aliases: asNumericChar asNumericDF > ### Keywords: manip > > ### ** Examples > > ## > ## 1. an example > ## > (xDate <- as.Date('1970-01-01')+c(0, 365)) [1] "1970-01-01" "1971-01-01" > (xPOSIX <- as.POSIXct(xDate)+c(1, 99)) [1] "1970-01-01 00:00:01 UTC" "1971-01-01 00:01:39 UTC" > xMSdate <- as.Date(1, + as.Date('1899-12-31'))+1:2 > (fakeF1 <- data.frame(yr=c('1948', + '1947 (1)'), + q1=c(' 1,234 ', ''), duh=rep(NA, 2), + dol=c('$1,234', ''), + pct=c('1%', '2%'), + xDate=as.character(xDate, + format='%Y-%m-%d'), + xPOSIX=as.character(xPOSIX, + format='%Y-%m-%d %H:%M:%S'), + xMSdate=2:3, junk=c('this is', + 'junk'))) Warning in as.character.POSIXt(as.POSIXlt(x), ...) : as.character(td, ..) no longer obeys a 'format' argument; use format(td, ..) ? Warning in as.character.POSIXt(xPOSIX, format = "%Y-%m-%d %H:%M:%S") : as.character(td, ..) no longer obeys a 'format' argument; use format(td, ..) ? yr q1 duh dol pct xDate xPOSIX xMSdate 1 1948 1,234 NA $1,234 1% 1970-01-01 1970-01-01 00:00:01 2 2 1947 (1) NA 2% 1971-01-01 1971-01-01 00:01:39 3 junk 1 this is 2 junk > > # This converts the last 3 columns to NAs and drops them: > > str(nF1.1 <- asNumericChar(fakeF1$yr)) num [1:2] 1948 1947 > str(nF1.2 <- asNumericChar(fakeF1$q1)) num [1:2] 1234 NA > str(nF1.3 <- asNumericChar(fakeF1$duh)) logi [1:2] NA NA > (nF1.4 <- asNumericChar('1969-12-31 18:00:01', + class.='POSIXct')) [1] "1969-12-31 06:00:01 UTC" > > (nF1 <- asNumericDF(fakeF1)) Warning in asNumericDF(fakeF1) : NAs introduced by coercion in asNumericChar(q1[2]) Warning in asNumericDF(fakeF1) : NAs introduced by coercion in asNumericChar(dol[2]) Warning in asNumericDF(fakeF1) : NAs introduced by coercion in asNumericChar(xDate[c(1, 2)]) Warning in asNumericDF(fakeF1) : NAs introduced by coercion in asNumericChar(xPOSIX[c(1, 2)]) Warning in asNumericDF(fakeF1) : NAs introduced by coercion in asNumericChar(junk[c(1, 2)]) yr q1 dol pct xMSdate 1 1948 1234 1234 0.01 2 2 1947 NA NA 0.02 3 > (nF2 <- asNumericDF(fakeF1, Dates=6, + MSdate='xMSdate', + ignore=c('junk', 'xPOSIX'), + format.='%Y-%m-%d')) Warning in asNumericDF(fakeF1, Dates = 6, MSdate = "xMSdate", ignore = c("junk", : NAs introduced by coercion in asNumericChar(q1[2]) Warning in asNumericDF(fakeF1, Dates = 6, MSdate = "xMSdate", ignore = c("junk", : NAs introduced by coercion in asNumericChar(dol[2]) yr q1 dol pct xDate xPOSIX xMSdate junk 1 1948 1234 1234 0.01 1970-01-01 1970-01-01 00:00:01 1900-01-02 this is 2 1947 NA NA 0.02 1971-01-01 1971-01-01 00:01:39 1900-01-03 junk > # check > nF1. <- data.frame(yr= + asNumericChar(fakeF1$yr), + q1=asNumericChar(fakeF1$q1), + dol=asNumericChar(fakeF1$dol), + pct=c(.01, .02), xMSdate=2:3) > > nF1c <- data.frame(yr=1948:1947, + q1=c(1234, NA), dol=c(1234, NA), + pct=c(.01, .02), xMSdate=2:3) > > ## Don't show: > stopifnot( + ## End(Don't show) + all.equal(nF1, nF1.) + ## Don't show: + ) > ## End(Don't show) > ## Don't show: > stopifnot( + ## End(Don't show) + all.equal(nF1., nF1c) + ## Don't show: + ) > ## End(Don't show) > > ## > ## 2. as.Date default example > ## > xD <- asNumericChar( + as.character(xDate), class.='Date') > ## Don't show: > stopifnot( + ## End(Don't show) + all.equal(xDate, xD) + ## Don't show: + ) > ## End(Don't show) > > ## > ## 3. as.POSIXct default example > ## > xPOSIX [1] "1970-01-01 00:00:01 UTC" "1971-01-01 00:01:39 UTC" > (xPOSIXch <- as.character(xPOSIX)) [1] "1970-01-01 00:00:01" "1971-01-01 00:01:39" > (xP <- asNumericChar(xPOSIXch, class.='POSIXct')) [1] "1969-12-31 12:00:01 UTC" "1970-12-31 12:01:39 UTC" > attr(xPOSIX, 'tzone') [1] "UTC" > attr(xP, 'tzone') [1] "UTC" > # R-Devel after 4.2.1 breaks earlier code; fix > if(is.null(attr(xPOSIX, 'tzone'))) + attr(xPOSIX, 'tzone') <- attr(xP, 'tzone') > (dP <- difftime(xPOSIX, xP, units='secs')) Time differences in secs [1] 43200 43200 > (madP <- max(abs(as.numeric(dP)))) [1] 43200 > ## Don't show: > stopifnot( + ## End(Don't show) + { + #all.equal(xPOSIX, xP) + # As of 2022-10-06 I don't know how to write code + # that will get a consistent answer with + # different version R-devel with differences + # less than an hour + if(madP>3600){ + stop('Discrepancy betw fn and manual comp ', + 'too large.') + } + TRUE + } + ## Don't show: + ) Error in stopifnot({ : Discrepancy betw fn and manual comp too large. Execution halted Flavor: r-release-macos-arm64

Version: 0.3-2
Check: examples
Result: ERROR Running examples in ‘Ecfun-Ex.R’ failed The error most likely occurred in: > ### Name: asNumericDF > ### Title: Coerce to numeric dropping commas and info after a blank > ### Aliases: asNumericChar asNumericDF > ### Keywords: manip > > ### ** Examples > > ## > ## 1. an example > ## > (xDate <- as.Date('1970-01-01')+c(0, 365)) [1] "1970-01-01" "1971-01-01" > (xPOSIX <- as.POSIXct(xDate)+c(1, 99)) [1] "1970-01-01 00:00:01 UTC" "1971-01-01 00:01:39 UTC" > xMSdate <- as.Date(1, + as.Date('1899-12-31'))+1:2 > (fakeF1 <- data.frame(yr=c('1948', + '1947 (1)'), + q1=c(' 1,234 ', ''), duh=rep(NA, 2), + dol=c('$1,234', ''), + pct=c('1%', '2%'), + xDate=as.character(xDate, + format='%Y-%m-%d'), + xPOSIX=as.character(xPOSIX, + format='%Y-%m-%d %H:%M:%S'), + xMSdate=2:3, junk=c('this is', + 'junk'))) Warning in as.character.POSIXt(as.POSIXlt(x), ...) : as.character(td, ..) no longer obeys a 'format' argument; use format(td, ..) ? Warning in as.character.POSIXt(xPOSIX, format = "%Y-%m-%d %H:%M:%S") : as.character(td, ..) no longer obeys a 'format' argument; use format(td, ..) ? yr q1 duh dol pct xDate xPOSIX xMSdate 1 1948 1,234 NA $1,234 1% 1970-01-01 1970-01-01 00:00:01 2 2 1947 (1) NA 2% 1971-01-01 1971-01-01 00:01:39 3 junk 1 this is 2 junk > > # This converts the last 3 columns to NAs and drops them: > > str(nF1.1 <- asNumericChar(fakeF1$yr)) num [1:2] 1948 1947 > str(nF1.2 <- asNumericChar(fakeF1$q1)) num [1:2] 1234 NA > str(nF1.3 <- asNumericChar(fakeF1$duh)) logi [1:2] NA NA > (nF1.4 <- asNumericChar('1969-12-31 18:00:01', + class.='POSIXct')) [1] "1969-12-31 23:00:01 UTC" > > (nF1 <- asNumericDF(fakeF1)) Warning in asNumericDF(fakeF1) : NAs introduced by coercion in asNumericChar(q1[2]) Warning in asNumericDF(fakeF1) : NAs introduced by coercion in asNumericChar(dol[2]) Warning in asNumericDF(fakeF1) : NAs introduced by coercion in asNumericChar(xDate[c(1, 2)]) Warning in asNumericDF(fakeF1) : NAs introduced by coercion in asNumericChar(xPOSIX[c(1, 2)]) Warning in asNumericDF(fakeF1) : NAs introduced by coercion in asNumericChar(junk[c(1, 2)]) yr q1 dol pct xMSdate 1 1948 1234 1234 0.01 2 2 1947 NA NA 0.02 3 > (nF2 <- asNumericDF(fakeF1, Dates=6, + MSdate='xMSdate', + ignore=c('junk', 'xPOSIX'), + format.='%Y-%m-%d')) Warning in asNumericDF(fakeF1, Dates = 6, MSdate = "xMSdate", ignore = c("junk", : NAs introduced by coercion in asNumericChar(q1[2]) Warning in asNumericDF(fakeF1, Dates = 6, MSdate = "xMSdate", ignore = c("junk", : NAs introduced by coercion in asNumericChar(dol[2]) yr q1 dol pct xDate xPOSIX xMSdate junk 1 1948 1234 1234 0.01 1970-01-01 1970-01-01 00:00:01 1900-01-02 this is 2 1947 NA NA 0.02 1971-01-01 1971-01-01 00:01:39 1900-01-03 junk > # check > nF1. <- data.frame(yr= + asNumericChar(fakeF1$yr), + q1=asNumericChar(fakeF1$q1), + dol=asNumericChar(fakeF1$dol), + pct=c(.01, .02), xMSdate=2:3) > > nF1c <- data.frame(yr=1948:1947, + q1=c(1234, NA), dol=c(1234, NA), + pct=c(.01, .02), xMSdate=2:3) > > ## Don't show: > stopifnot( + ## End(Don't show) + all.equal(nF1, nF1.) + ## Don't show: + ) > ## End(Don't show) > ## Don't show: > stopifnot( + ## End(Don't show) + all.equal(nF1., nF1c) + ## Don't show: + ) > ## End(Don't show) > > ## > ## 2. as.Date default example > ## > xD <- asNumericChar( + as.character(xDate), class.='Date') > ## Don't show: > stopifnot( + ## End(Don't show) + all.equal(xDate, xD) + ## Don't show: + ) > ## End(Don't show) > > ## > ## 3. as.POSIXct default example > ## > xPOSIX [1] "1970-01-01 00:00:01 UTC" "1971-01-01 00:01:39 UTC" > (xPOSIXch <- as.character(xPOSIX)) [1] "1970-01-01 00:00:01" "1971-01-01 00:01:39" > (xP <- asNumericChar(xPOSIXch, class.='POSIXct')) [1] "1970-01-01 05:00:01 UTC" "1971-01-01 05:01:39 UTC" > attr(xPOSIX, 'tzone') [1] "UTC" > attr(xP, 'tzone') [1] "UTC" > # R-Devel after 4.2.1 breaks earlier code; fix > if(is.null(attr(xPOSIX, 'tzone'))) + attr(xPOSIX, 'tzone') <- attr(xP, 'tzone') > (dP <- difftime(xPOSIX, xP, units='secs')) Time differences in secs [1] -18000 -18000 > (madP <- max(abs(as.numeric(dP)))) [1] 18000 > ## Don't show: > stopifnot( + ## End(Don't show) + { + #all.equal(xPOSIX, xP) + # As of 2022-10-06 I don't know how to write code + # that will get a consistent answer with + # different version R-devel with differences + # less than an hour + if(madP>3600){ + stop('Discrepancy betw fn and manual comp ', + 'too large.') + } + TRUE + } + ## Don't show: + ) Error in stopifnot({ : Discrepancy betw fn and manual comp too large. Execution halted Flavor: r-release-macos-x86_64