R Under development (unstable) (2025-05-30 r88253 ucrt) -- "Unsuffered Consequences" Copyright (C) 2025 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. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > > if(require("RUnit", quietly=TRUE)) { + ## Run all the tests + wd <- getwd() + testsuite <- defineTestSuite("PCICt", dirs=wd, testFileRegexp = "^test_functions.R$", testFuncRegexp = "^PCICt.test.+") + PCICt.test.result <- runTestSuite(testsuite, useOwnErrorHandler=F) + printTextProtocol(PCICt.test.result) + } Executing test function PCICt.test.as.PCICt ... Timing stopped at: 0.01 0 0.02 Error in checkEquals(as.character(as.PCICt(test.values[i], cal = cal)), : 1 string mismatch In addition: Warning messages: 1: In RNGkind(kind = testSuite$rngKind, normal.kind = testSuite$rngNormalKind) : RNGkind: Marsaglia-Multicarry has poor statistical properties 2: In RNGkind(kind = testSuite$rngKind, normal.kind = testSuite$rngNormalKind) : RNGkind: severe deviations from normality for Kinderman-Ramage + Marsaglia-Multicarry done successfully. Executing test function PCICt.test.as.POSIXct ... done successfully. Executing test function PCICt.test.as.POSIXlt ... done successfully. Executing test function PCICt.test.c ... done successfully. Executing test function PCICt.test.cut ... done successfully. Executing test function PCICt.test.format ... [1] " == 2012-02-28" [1] "centre == 2012-02-28 " "12 == 2012-02-28 " [1] "left == 2012-02-28 " "12 == 2012-02-28 " [1] "centre == 2012-02-28 " "12 == 2012-02-28 " "6 == 2012-02-28 " done successfully. Executing test function PCICt.test.julian ... done successfully. Executing test function PCICt.test.operators ... Error in `-.PCICt`(test.365, test.greg) : attr(e1, "cal") == attr(e2, "cal") is not TRUE Error in `-.PCICt`(test.365, test.greg) : attr(e1, "cal") == attr(e2, "cal") is not TRUE done successfully. Executing test function PCICt.test.pretty ... done successfully. Executing test function PCICt.test.range ... done successfully. Executing test function PCICt.test.round ... done successfully. Executing test function PCICt.test.seq ... done successfully. Executing test function PCICt.test.subset ... Error in `[<-.PCICt`(`*tmp*`, 1:3, value = structure(c(1314144000, 1311292800, : class(value) == class(x) & attr(x, "cal") == attr(value, "cal") is not TRUE done successfully. Executing test function PCICt.test.summary ... done successfully. Executing test function PCICt.test.trunc ... done successfully. RUNIT TEST PROTOCOL -- Mon Jun 2 18:32:39 2025 *********************************************** Number of test functions: 15 Number of errors: 0 Number of failures: 1 1 Test Suite : PCICt - 15 test functions, 0 errors, 1 failure FAILURE in PCICt.test.as.PCICt: Error in checkEquals(as.character(as.PCICt(test.values[i], cal = cal)), : 1 string mismatch Details *************************** Test Suite: PCICt Test function regexp: ^PCICt.test.+ Test file regexp: ^test_functions.R$ Involved directory: d:/RCompile/CRANincoming/R-devel/PCICt.Rcheck/tests --------------------------- Test file: d:/RCompile/CRANincoming/R-devel/PCICt.Rcheck/tests/test_functions.R PCICt.test.as.PCICt: FAILURE !! (check number 13) Error in checkEquals(as.character(as.PCICt(test.values[i], cal = cal)), : 1 string mismatch PCICt.test.as.POSIXct: (0 checks) ... OK (0 seconds) PCICt.test.as.POSIXlt: (0 checks) ... OK (0 seconds) PCICt.test.c: (0 checks) ... OK (0 seconds) PCICt.test.cut: (0 checks) ... OK (0 seconds) PCICt.test.format: (4 checks) ... OK (0 seconds) PCICt.test.julian: (0 checks) ... OK (0 seconds) PCICt.test.operators: (8 checks) ... OK (0 seconds) PCICt.test.pretty: (0 checks) ... OK (0 seconds) PCICt.test.range: (0 checks) ... OK (0 seconds) PCICt.test.round: (12 checks) ... OK (0 seconds) PCICt.test.seq: (6 checks) ... OK (0 seconds) PCICt.test.subset: (5 checks) ... OK (0 seconds) PCICt.test.summary: (0 checks) ... OK (0 seconds) PCICt.test.trunc: (12 checks) ... OK (0 seconds) > > proc.time() user system elapsed 0.17 0.04 0.20