CRAN Package Check Results for Package openxlsx

Last updated on 2024-06-17 22:54:06 CEST.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 4.2.5.2 152.54 128.66 281.20 ERROR
r-devel-linux-x86_64-debian-gcc 4.2.5.2 109.18 92.48 201.66 ERROR
r-devel-linux-x86_64-fedora-clang 4.2.5.2 380.33 ERROR
r-devel-linux-x86_64-fedora-gcc 4.2.5.2 377.07 ERROR
r-devel-windows-x86_64 4.2.5.2 113.00 148.00 261.00 ERROR
r-patched-linux-x86_64 4.2.5.2 127.06 138.60 265.66 NOTE
r-release-linux-x86_64 4.2.5.2 124.77 140.29 265.06 NOTE
r-release-macos-arm64 4.2.5.2 93.00 NOTE
r-release-macos-x86_64 4.2.5.2 138.00 NOTE
r-release-windows-x86_64 4.2.5.2 110.00 172.00 282.00 NOTE
r-oldrel-macos-arm64 4.2.5.2 109.00 NOTE
r-oldrel-macos-x86_64 4.2.5.2 185.00 NOTE
r-oldrel-windows-x86_64 4.2.5.2 103.00 194.00 297.00 OK

Additional issues

clang-UBSAN gcc-UBSAN valgrind

Check Details

Version: 4.2.5.2
Check: Rd files
Result: NOTE checkRd: (-1) addWorksheet.Rd:68: Lost braces in \itemize; meant \describe ? checkRd: (-1) addWorksheet.Rd:69: Lost braces in \itemize; meant \describe ? checkRd: (-1) addWorksheet.Rd:70: Lost braces in \itemize; meant \describe ? checkRd: (-1) addWorksheet.Rd:71: Lost braces in \itemize; meant \describe ? checkRd: (-1) addWorksheet.Rd:72: Lost braces in \itemize; meant \describe ? checkRd: (-1) addWorksheet.Rd:73: Lost braces in \itemize; meant \describe ? checkRd: (-1) addWorksheet.Rd:74: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:43: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:48: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:49: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:50-51: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:52: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:57: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:58: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:59-60: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:61: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:62: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:63: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:64-66: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:67: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:68: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:69: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:70: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:75: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:76: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:77: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:78: Lost braces in \itemize; meant \describe ? checkRd: (-1) buildWorkbook.Rd:83: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:51: Lost braces 51 | \item{\strong{COMMA}{ for comma separated thousands}} | ^ checkRd: (-1) createStyle.Rd:58: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:59: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:60: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:61: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:62: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:63: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:64: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:65: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:73: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:74: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:75: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:76: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:77: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:78: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:79: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:80: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:81: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:82: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:83: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:84: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:85: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:86: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:98: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:99: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:100: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:101: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:107: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:108: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:109: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:114: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:115: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:116: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:117: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:118: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:119: Lost braces in \itemize; meant \describe ? checkRd: (-1) createStyle.Rd:120: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:68: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:69: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:70: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:71: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:72: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:73: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:74: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:75: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:76: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:77: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:78: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:79: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:80: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:81: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:82: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:83: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:84: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:85: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:86: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:87: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:88: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:89: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:90: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:91: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:92: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:93: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:94: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:95: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:96: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:97: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:98: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:99: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:100: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:101: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:102: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:103: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:104: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:105: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:106: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:107: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:108: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:109: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:110: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:111: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:112: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:113: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:114: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:115: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:116: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:117: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:118: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:119: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:120: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:121: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:122: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:123: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:124: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:125: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:126: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:127: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:128: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:129: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:130: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:131: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:132: Lost braces in \itemize; meant \describe ? checkRd: (-1) pageSetup.Rd:133: Lost braces in \itemize; meant \describe ? checkRd: (-1) setHeaderFooter.Rd:41: Lost braces in \itemize; meant \describe ? checkRd: (-1) setHeaderFooter.Rd:42: Lost braces in \itemize; meant \describe ? checkRd: (-1) setHeaderFooter.Rd:43: Lost braces in \itemize; meant \describe ? checkRd: (-1) setHeaderFooter.Rd:44: Lost braces in \itemize; meant \describe ? checkRd: (-1) setHeaderFooter.Rd:45: Lost braces in \itemize; meant \describe ? checkRd: (-1) setHeaderFooter.Rd:46: Lost braces in \itemize; meant \describe ? checkRd: (-1) setHeaderFooter.Rd:47: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:34: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:39: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:40: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:41-42: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:43: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:48: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:49: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:50-51: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:52: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:53: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:54: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:55-57: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:58: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:59: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:60: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:61: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:66: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:67: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:68: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:69: Lost braces in \itemize; meant \describe ? checkRd: (-1) write.xlsx.Rd:74: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:64: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:65: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:66: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:67: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:68: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:69: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:70: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:71: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:72: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:73: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:74: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:75: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:76: Lost braces in \itemize; meant \describe ? checkRd: (-1) writeData.Rd:77: 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, r-release-linux-x86_64, r-release-macos-arm64, r-release-macos-x86_64, r-release-windows-x86_64

Version: 4.2.5.2
Check: tests
Result: ERROR Running ‘testthat.R’ [24s/29s] Running the tests in ‘tests/testthat.R’ failed. Complete output: > library(testthat) > library(openxlsx) > > test_check("openxlsx") *** caught segfault *** address 0x1, cause 'memory not mapped' Traceback: 1: read_workbook(cols_in = cell_cols, rows_in = cell_rows, v = v, string_inds = string_refs, is_date = isDate, hasColNames = colNames, hasSepNames = sep.names, skipEmptyRows = skipEmptyRows, skipEmptyCols = skipEmptyCols, nRows = nRows, clean_names = clean_names) 2: read.xlsx.default(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) 3: read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) 4: eval(code, test_env) 5: eval(code, test_env) 6: withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error) 7: doTryCatch(return(expr), name, parentenv, handler) 8: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 9: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) 10: doTryCatch(return(expr), name, parentenv, handler) 11: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) 12: tryCatchList(expr, classes, parentenv, handlers) 13: tryCatch(withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) { }) 14: test_code(desc, code, env = parent.frame(), default_reporter = local_interactive_reporter()) 15: test_that("Reading example workbook readTest.xlsx", { curr_wd <- getwd() xlsxFile <- system.file("extdata", "readTest.xlsx", package = "openxlsx") wb <- loadWorkbook(xlsxFile) sheet <- 1 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(10, 7)) expect_equal(dim(y), c(10, 7)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, detectDates = TRUE) y <- read.xlsx(wb, sheet, detectDates = TRUE) expect_equal(dim(x), c(10, 7)) expect_equal(dim(y), c(10, 7)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(9, 5)) expect_equal(dim(y), c(9, 5)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 6)) expect_equal(dim(y), c(2, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 6)) expect_equal(dim(y), c(3, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 6)) expect_equal(dim(y), c(3, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(9, 2)) expect_equal(dim(y), c(9, 2)) expect_equal(x, y) sheet <- 2 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(33, 9)) expect_equal(dim(y), c(33, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(32, 9)) expect_equal(dim(y), c(32, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 9)) expect_equal(dim(y), c(2, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 9)) expect_equal(dim(y), c(3, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 9)) expect_equal(dim(y), c(3, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(21, 3)) expect_equal(dim(y), c(21, 3)) expect_equal(x, y) sheet <- 3 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(2083, 5)) expect_equal(dim(y), c(2083, 5)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(2084, 5)) expect_equal(dim(y), c(2084, 5)) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, NULL) expect_equal(y, NULL) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, NULL) expect_equal(y, NULL) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(2084, 2)) expect_equal(dim(y), c(2084, 2)) expect_equal(x, y) sheet <- 5 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(271, 297)) expect_equal(dim(y), c(271, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(270, 297)) expect_equal(dim(y), c(270, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 297)) expect_equal(dim(y), c(2, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 297)) expect_equal(dim(y), c(3, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 297)) expect_equal(dim(y), c(3, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(272, 3)) expect_equal(dim(y), c(272, 3)) expect_equal(x, y) expect_equal(object = getwd(), curr_wd)}) 16: eval(code, test_env) 17: eval(code, test_env) 18: withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error) 19: doTryCatch(return(expr), name, parentenv, handler) 20: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 21: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) 22: doTryCatch(return(expr), name, parentenv, handler) 23: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) 24: tryCatchList(expr, classes, parentenv, handlers) 25: tryCatch(withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) { }) 26: test_code(test = NULL, code = exprs, env = env, default_reporter = StopReporter$new()) 27: source_file(path, env = env(env), desc = desc, error_call = error_call) 28: FUN(X[[i]], ...) 29: lapply(test_paths, test_one_file, env = env, desc = desc, error_call = error_call) 30: doTryCatch(return(expr), name, parentenv, handler) 31: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 32: tryCatchList(expr, classes, parentenv, handlers) 33: tryCatch(code, testthat_abort_reporter = function(cnd) { cat(conditionMessage(cnd), "\n") NULL}) 34: with_reporter(reporters$multi, lapply(test_paths, test_one_file, env = env, desc = desc, error_call = error_call)) 35: test_files_serial(test_dir = test_dir, test_package = test_package, test_paths = test_paths, load_helpers = load_helpers, reporter = reporter, env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning, desc = desc, load_package = load_package, error_call = error_call) 36: test_files(test_dir = path, test_paths = test_paths, test_package = package, reporter = reporter, load_helpers = load_helpers, env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning, load_package = load_package, parallel = parallel) 37: test_dir("testthat", package = package, reporter = reporter, ..., load_package = "installed") 38: test_check("openxlsx") An irrecoverable exception occurred. R is aborting now ... Segmentation fault Flavor: r-devel-linux-x86_64-debian-clang

Version: 4.2.5.2
Check: tests
Result: ERROR Running ‘testthat.R’ [18s/24s] Running the tests in ‘tests/testthat.R’ failed. Complete output: > library(testthat) > library(openxlsx) > > test_check("openxlsx") *** caught segfault *** address 0x1, cause 'memory not mapped' Traceback: 1: read_workbook(cols_in = cell_cols, rows_in = cell_rows, v = v, string_inds = string_refs, is_date = isDate, hasColNames = colNames, hasSepNames = sep.names, skipEmptyRows = skipEmptyRows, skipEmptyCols = skipEmptyCols, nRows = nRows, clean_names = clean_names) 2: read.xlsx.default(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) 3: read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) 4: eval(code, test_env) 5: eval(code, test_env) 6: withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error) 7: doTryCatch(return(expr), name, parentenv, handler) 8: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 9: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) 10: doTryCatch(return(expr), name, parentenv, handler) 11: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) 12: tryCatchList(expr, classes, parentenv, handlers) 13: tryCatch(withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) { }) 14: test_code(desc, code, env = parent.frame(), default_reporter = local_interactive_reporter()) 15: test_that("Reading example workbook readTest.xlsx", { curr_wd <- getwd() xlsxFile <- system.file("extdata", "readTest.xlsx", package = "openxlsx") wb <- loadWorkbook(xlsxFile) sheet <- 1 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(10, 7)) expect_equal(dim(y), c(10, 7)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, detectDates = TRUE) y <- read.xlsx(wb, sheet, detectDates = TRUE) expect_equal(dim(x), c(10, 7)) expect_equal(dim(y), c(10, 7)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(9, 5)) expect_equal(dim(y), c(9, 5)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 6)) expect_equal(dim(y), c(2, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 6)) expect_equal(dim(y), c(3, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 6)) expect_equal(dim(y), c(3, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(9, 2)) expect_equal(dim(y), c(9, 2)) expect_equal(x, y) sheet <- 2 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(33, 9)) expect_equal(dim(y), c(33, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(32, 9)) expect_equal(dim(y), c(32, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 9)) expect_equal(dim(y), c(2, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 9)) expect_equal(dim(y), c(3, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 9)) expect_equal(dim(y), c(3, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(21, 3)) expect_equal(dim(y), c(21, 3)) expect_equal(x, y) sheet <- 3 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(2083, 5)) expect_equal(dim(y), c(2083, 5)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(2084, 5)) expect_equal(dim(y), c(2084, 5)) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, NULL) expect_equal(y, NULL) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, NULL) expect_equal(y, NULL) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(2084, 2)) expect_equal(dim(y), c(2084, 2)) expect_equal(x, y) sheet <- 5 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(271, 297)) expect_equal(dim(y), c(271, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(270, 297)) expect_equal(dim(y), c(270, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 297)) expect_equal(dim(y), c(2, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 297)) expect_equal(dim(y), c(3, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 297)) expect_equal(dim(y), c(3, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(272, 3)) expect_equal(dim(y), c(272, 3)) expect_equal(x, y) expect_equal(object = getwd(), curr_wd)}) 16: eval(code, test_env) 17: eval(code, test_env) 18: withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error) 19: doTryCatch(return(expr), name, parentenv, handler) 20: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 21: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) 22: doTryCatch(return(expr), name, parentenv, handler) 23: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) 24: tryCatchList(expr, classes, parentenv, handlers) 25: tryCatch(withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) { }) 26: test_code(test = NULL, code = exprs, env = env, default_reporter = StopReporter$new()) 27: source_file(path, env = env(env), desc = desc, error_call = error_call) 28: FUN(X[[i]], ...) 29: lapply(test_paths, test_one_file, env = env, desc = desc, error_call = error_call) 30: doTryCatch(return(expr), name, parentenv, handler) 31: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 32: tryCatchList(expr, classes, parentenv, handlers) 33: tryCatch(code, testthat_abort_reporter = function(cnd) { cat(conditionMessage(cnd), "\n") NULL}) 34: with_reporter(reporters$multi, lapply(test_paths, test_one_file, env = env, desc = desc, error_call = error_call)) 35: test_files_serial(test_dir = test_dir, test_package = test_package, test_paths = test_paths, load_helpers = load_helpers, reporter = reporter, env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning, desc = desc, load_package = load_package, error_call = error_call) 36: test_files(test_dir = path, test_paths = test_paths, test_package = package, reporter = reporter, load_helpers = load_helpers, env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning, load_package = load_package, parallel = parallel) 37: test_dir("testthat", package = package, reporter = reporter, ..., load_package = "installed") 38: test_check("openxlsx") An irrecoverable exception occurred. R is aborting now ... Segmentation fault Flavor: r-devel-linux-x86_64-debian-gcc

Version: 4.2.5.2
Check: tests
Result: ERROR Running ‘testthat.R’ [30s/48s] Running the tests in ‘tests/testthat.R’ failed. Complete output: > library(testthat) > library(openxlsx) > > test_check("openxlsx") *** caught segfault *** address 0x1, cause 'memory not mapped' Traceback: 1: read_workbook(cols_in = cell_cols, rows_in = cell_rows, v = v, string_inds = string_refs, is_date = isDate, hasColNames = colNames, hasSepNames = sep.names, skipEmptyRows = skipEmptyRows, skipEmptyCols = skipEmptyCols, nRows = nRows, clean_names = clean_names) 2: read.xlsx.default(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) 3: read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) 4: eval(code, test_env) 5: eval(code, test_env) 6: withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error) 7: doTryCatch(return(expr), name, parentenv, handler) 8: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 9: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) 10: doTryCatch(return(expr), name, parentenv, handler) 11: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) 12: tryCatchList(expr, classes, parentenv, handlers) 13: tryCatch(withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) { }) 14: test_code(desc, code, env = parent.frame(), default_reporter = local_interactive_reporter()) 15: test_that("Reading example workbook readTest.xlsx", { curr_wd <- getwd() xlsxFile <- system.file("extdata", "readTest.xlsx", package = "openxlsx") wb <- loadWorkbook(xlsxFile) sheet <- 1 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(10, 7)) expect_equal(dim(y), c(10, 7)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, detectDates = TRUE) y <- read.xlsx(wb, sheet, detectDates = TRUE) expect_equal(dim(x), c(10, 7)) expect_equal(dim(y), c(10, 7)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(9, 5)) expect_equal(dim(y), c(9, 5)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 6)) expect_equal(dim(y), c(2, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 6)) expect_equal(dim(y), c(3, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 6)) expect_equal(dim(y), c(3, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(9, 2)) expect_equal(dim(y), c(9, 2)) expect_equal(x, y) sheet <- 2 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(33, 9)) expect_equal(dim(y), c(33, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(32, 9)) expect_equal(dim(y), c(32, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 9)) expect_equal(dim(y), c(2, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 9)) expect_equal(dim(y), c(3, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 9)) expect_equal(dim(y), c(3, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(21, 3)) expect_equal(dim(y), c(21, 3)) expect_equal(x, y) sheet <- 3 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(2083, 5)) expect_equal(dim(y), c(2083, 5)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(2084, 5)) expect_equal(dim(y), c(2084, 5)) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, NULL) expect_equal(y, NULL) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, NULL) expect_equal(y, NULL) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(2084, 2)) expect_equal(dim(y), c(2084, 2)) expect_equal(x, y) sheet <- 5 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(271, 297)) expect_equal(dim(y), c(271, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(270, 297)) expect_equal(dim(y), c(270, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 297)) expect_equal(dim(y), c(2, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 297)) expect_equal(dim(y), c(3, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 297)) expect_equal(dim(y), c(3, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(272, 3)) expect_equal(dim(y), c(272, 3)) expect_equal(x, y) expect_equal(object = getwd(), curr_wd)}) 16: eval(code, test_env) 17: eval(code, test_env) 18: withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error) 19: doTryCatch(return(expr), name, parentenv, handler) 20: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 21: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) 22: doTryCatch(return(expr), name, parentenv, handler) 23: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) 24: tryCatchList(expr, classes, parentenv, handlers) 25: tryCatch(withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) { }) 26: test_code(test = NULL, code = exprs, env = env, default_reporter = StopReporter$new()) 27: source_file(path, env = env(env), desc = desc, error_call = error_call) 28: FUN(X[[i]], ...) 29: lapply(test_paths, test_one_file, env = env, desc = desc, error_call = error_call) 30: doTryCatch(return(expr), name, parentenv, handler) 31: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 32: tryCatchList(expr, classes, parentenv, handlers) 33: tryCatch(code, testthat_abort_reporter = function(cnd) { cat(conditionMessage(cnd), "\n") NULL}) 34: with_reporter(reporters$multi, lapply(test_paths, test_one_file, env = env, desc = desc, error_call = error_call)) 35: test_files_serial(test_dir = test_dir, test_package = test_package, test_paths = test_paths, load_helpers = load_helpers, reporter = reporter, env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning, desc = desc, load_package = load_package, error_call = error_call) 36: test_files(test_dir = path, test_paths = test_paths, test_package = package, reporter = reporter, load_helpers = load_helpers, env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning, load_package = load_package, parallel = parallel) 37: test_dir("testthat", package = package, reporter = reporter, ..., load_package = "installed") 38: test_check("openxlsx") An irrecoverable exception occurred. R is aborting now ... Flavor: r-devel-linux-x86_64-fedora-clang

Version: 4.2.5.2
Check: tests
Result: ERROR Running ‘testthat.R’ [28s/39s] Running the tests in ‘tests/testthat.R’ failed. Complete output: > library(testthat) > library(openxlsx) > > test_check("openxlsx") *** caught segfault *** address 0x1, cause 'memory not mapped' Traceback: 1: read_workbook(cols_in = cell_cols, rows_in = cell_rows, v = v, string_inds = string_refs, is_date = isDate, hasColNames = colNames, hasSepNames = sep.names, skipEmptyRows = skipEmptyRows, skipEmptyCols = skipEmptyCols, nRows = nRows, clean_names = clean_names) 2: read.xlsx.default(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) 3: read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) 4: eval(code, test_env) 5: eval(code, test_env) 6: withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error) 7: doTryCatch(return(expr), name, parentenv, handler) 8: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 9: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) 10: doTryCatch(return(expr), name, parentenv, handler) 11: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) 12: tryCatchList(expr, classes, parentenv, handlers) 13: tryCatch(withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) { }) 14: test_code(desc, code, env = parent.frame(), default_reporter = local_interactive_reporter()) 15: test_that("Reading example workbook readTest.xlsx", { curr_wd <- getwd() xlsxFile <- system.file("extdata", "readTest.xlsx", package = "openxlsx") wb <- loadWorkbook(xlsxFile) sheet <- 1 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(10, 7)) expect_equal(dim(y), c(10, 7)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, detectDates = TRUE) y <- read.xlsx(wb, sheet, detectDates = TRUE) expect_equal(dim(x), c(10, 7)) expect_equal(dim(y), c(10, 7)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(9, 5)) expect_equal(dim(y), c(9, 5)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 6)) expect_equal(dim(y), c(2, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 6)) expect_equal(dim(y), c(3, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 6)) expect_equal(dim(y), c(3, 6)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(9, 2)) expect_equal(dim(y), c(9, 2)) expect_equal(x, y) sheet <- 2 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(33, 9)) expect_equal(dim(y), c(33, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(32, 9)) expect_equal(dim(y), c(32, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 9)) expect_equal(dim(y), c(2, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 9)) expect_equal(dim(y), c(3, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 9)) expect_equal(dim(y), c(3, 9)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(21, 3)) expect_equal(dim(y), c(21, 3)) expect_equal(x, y) sheet <- 3 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(2083, 5)) expect_equal(dim(y), c(2083, 5)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(2084, 5)) expect_equal(dim(y), c(2084, 5)) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, NULL) expect_equal(y, NULL) expect_equal(x, y) x <- suppressWarnings(read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE)) y <- suppressWarnings(read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE)) expect_equal(dim(x), NULL) expect_equal(dim(y), NULL) expect_equal(x, NULL) expect_equal(y, NULL) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(2084, 2)) expect_equal(dim(y), c(2084, 2)) expect_equal(x, y) sheet <- 5 x <- read.xlsx(xlsxFile, sheet) y <- read.xlsx(wb, sheet) expect_equal(dim(x), c(271, 297)) expect_equal(dim(y), c(271, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, startRow = 3, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(270, 297)) expect_equal(dim(y), c(270, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = TRUE, detectDates = TRUE) expect_equal(dim(x), c(2, 297)) expect_equal(dim(y), c(2, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = TRUE) expect_equal(dim(x), c(3, 297)) expect_equal(dim(y), c(3, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) y <- read.xlsx(wb, sheet, rows = 2:4, colNames = FALSE, detectDates = FALSE) expect_equal(dim(x), c(3, 297)) expect_equal(dim(y), c(3, 297)) expect_equal(x, y) x <- read.xlsx(xlsxFile, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) y <- read.xlsx(wb, sheet, colNames = FALSE, detectDates = FALSE, cols = 2:4) expect_equal(dim(x), c(272, 3)) expect_equal(dim(y), c(272, 3)) expect_equal(x, y) expect_equal(object = getwd(), curr_wd)}) 16: eval(code, test_env) 17: eval(code, test_env) 18: withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error) 19: doTryCatch(return(expr), name, parentenv, handler) 20: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 21: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) 22: doTryCatch(return(expr), name, parentenv, handler) 23: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) 24: tryCatchList(expr, classes, parentenv, handlers) 25: tryCatch(withCallingHandlers({ eval(code, test_env) if (!handled && !is.null(test)) { skip_empty() }}, expectation = handle_expectation, skip = handle_skip, warning = handle_warning, message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) { }) 26: test_code(test = NULL, code = exprs, env = env, default_reporter = StopReporter$new()) 27: source_file(path, env = env(env), desc = desc, error_call = error_call) 28: FUN(X[[i]], ...) 29: lapply(test_paths, test_one_file, env = env, desc = desc, error_call = error_call) 30: doTryCatch(return(expr), name, parentenv, handler) 31: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 32: tryCatchList(expr, classes, parentenv, handlers) 33: tryCatch(code, testthat_abort_reporter = function(cnd) { cat(conditionMessage(cnd), "\n") NULL}) 34: with_reporter(reporters$multi, lapply(test_paths, test_one_file, env = env, desc = desc, error_call = error_call)) 35: test_files_serial(test_dir = test_dir, test_package = test_package, test_paths = test_paths, load_helpers = load_helpers, reporter = reporter, env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning, desc = desc, load_package = load_package, error_call = error_call) 36: test_files(test_dir = path, test_paths = test_paths, test_package = package, reporter = reporter, load_helpers = load_helpers, env = env, stop_on_failure = stop_on_failure, stop_on_warning = stop_on_warning, load_package = load_package, parallel = parallel) 37: test_dir("testthat", package = package, reporter = reporter, ..., load_package = "installed") 38: test_check("openxlsx") An irrecoverable exception occurred. R is aborting now ... Flavor: r-devel-linux-x86_64-fedora-gcc

Version: 4.2.5.2
Check: tests
Result: ERROR Running 'testthat.R' [23s] Running the tests in 'tests/testthat.R' failed. Complete output: > library(testthat) > library(openxlsx) > > test_check("openxlsx") Flavor: r-devel-windows-x86_64

Version: 4.2.5.2
Check: installed package size
Result: NOTE installed size is 7.0Mb sub-directories of 1Mb or more: extdata 1.1Mb libs 4.7Mb Flavors: r-release-macos-arm64, r-release-macos-x86_64, r-oldrel-macos-arm64, r-oldrel-macos-x86_64