Running ‘testthat.R’ [17m/12m]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(datawizard)
  > 
  > test_check("datawizard")
  Starting 2 test processes.
  Saving _problems/test-data_tabulate-3.R
  Saving _problems/test-data_tabulate-25.R
  Saving _problems/test-data_tabulate-48.R
  Saving _problems/test-data_tabulate-60.R
  Saving _problems/test-data_tabulate-71.R
  Saving _problems/test-data_tabulate-115.R
  Saving _problems/test-data_tabulate-197.R
  Saving _problems/test-data_tabulate-217.R
  Saving _problems/test-data_tabulate-223.R
  Saving _problems/test-data_tabulate-230.R
  Saving _problems/test-data_tabulate-238.R
  Saving _problems/test-data_tabulate-245.R
  Saving _problems/test-data_tabulate-308.R
  Saving _problems/test-data_tabulate-316.R
  Saving _problems/test-data_tabulate-329.R
  Saving _problems/test-data_tabulate-334.R
  Saving _problems/test-data_tabulate-350.R
  Saving _problems/test-data_tabulate-361.R
  Saving _problems/test-data_tabulate-704.R
  Saving _problems/test-data_tabulate-832.R
  Saving _problems/test-data_tabulate-931.R
  Saving _problems/test-data_tabulate-1005.R
  > test-describe_distribution.R: Bootstrapping confidence intervals using 100 iterations, please be
  > test-describe_distribution.R:   patient...
  > test-describe_distribution.R:   For more stable intervals, increase the number
  > test-describe_distribution.R:  of `iterations`, but note
  > test-describe_distribution.R:   that this can also increase the computation time significantly.
  > test-describe_distribution.R: Bootstrapping confidence intervals using 100 iterations, please be
  > test-describe_distribution.R:   patient...
  > test-describe_distribution.R:   For more stable intervals, increase the number of `iterations`, but note
  > test-describe_distribution.R:   that this can also increase the computation time significantly.
  > test-describe_distribution.R: Bootstrapping confidence intervals using 100 iterations, please be
  > test-describe_distribution.R:   patient...
  > test-describe_distribution.R:   For more stable intervals, increase the number of `iterations`, but note
  > test-describe_distribution.R:   that this can also increase the computation time significantly.
  [ FAIL 22 | WARN 0 | SKIP 82 | PASS 1984 ]
  
  ══ Skipped tests (82) ══════════════════════════════════════════════════════════
  • On CRAN (82): 'test-categorize.R:664:1', 'test-categorize.R:681:1',
    'test-contr.deviation.R:10:1', 'test-data_codebook.R:4:1',
    'test-data_codebook.R:9:1', 'test-data_codebook.R:14:1',
    'test-data_codebook.R:30:1', 'test-data_codebook.R:53:1',
    'test-data_codebook.R:58:1', 'test-data_codebook.R:63:1',
    'test-data_codebook.R:78:1', 'test-data_codebook.R:86:1',
    'test-data_codebook.R:94:1', 'test-data_codebook.R:105:1',
    'test-data_codebook.R:115:1', 'test-data_codebook.R:126:1',
    'test-data_codebook.R:138:1', 'test-data_codebook.R:156:1',
    'test-data_codebook.R:173:1', 'test-data_codebook.R:182:1',
    'test-data_codebook.R:191:1', 'test-data_codebook.R:237:1',
    'test-data_partition.R:1:1', 'test-data_peek.R:31:1', 'test-data_read.R:8:1',
    'test-data_modify.R:488:1', 'test-data_modify.R:497:1',
    'test-data_modify.R:717:1', 'test-data_rescale.R:1:1',
    'test-data_seek.R:85:1', 'test-data_separate.R:190:1',
    'test-data_separate.R:285:1', 'test-data_separate.R:381:1',
    'test-data_separate.R:402:1', 'test-data_summary.R:196:1',
    'test-data_summary.R:208:1', 'test-data_summary.R:284:1',
    'test-data_to_factor.R:124:1', 'test-data_tabulate.R:374:1',
    'test-data_tabulate.R:547:1', 'test-data_tabulate.R:603:1',
    'test-data_tabulate.R:636:1', 'test-data_tabulate.R:722:1',
    'test-data_tabulate.R:816:1', 'test-data_to_long.R:61:1',
    'test-data_to_long.R:498:1', 'test-data_to_numeric.R:1:1',
    'test-data_to_numeric.R:51:1', 'test-data_to_numeric.R:215:3',
    'test-data_write.R:5:1', 'test-demean.R:1:1', 'test-demean.R:85:1',
    'test-empty-dataframe.R:1:1', 'test-describe_distribution.R:76:1',
    'test-describe_distribution.R:87:1', 'test-describe_distribution.R:195:1',
    'test-describe_distribution.R:209:1', 'test-describe_distribution.R:282:1',
    'test-describe_distribution.R:412:1', 'test-describe_distribution.R:519:1',
    'test-describe_distribution.R:528:1', 'test-means_by_group.R:1:1',
    'test-means_by_group.R:24:1', 'test-print.dw_transformer.R:1:1',
    'test-ranktransform.R:65:1', 'test-normalize.R:1:1',
    'test-rescale_weights.R:1:1', 'test-rescale_weights.R:35:1',
    'test-rescale_weights.R:49:1', 'test-reshape_ci.R:1:1',
    'test-reshape_ci.R:16:1', 'test-skewness-kurtosis.R:47:1',
    'test-skewness-kurtosis.R:57:1', 'test-skewness-kurtosis.R:68:1',
    'test-skewness-kurtosis.R:78:1', 'test-smoothness.R:33:1',
    'test-standardize_models.R:244:3', 'test-standardize_models.R:291:3',
    'test-standardize_models.R:381:3', 'test-text_format.R:1:1',
    'test-text_format.R:77:1', 'test-winsorization.R:5:1'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-data_tabulate.R:3:3'): data_tabulate factor ────────────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(efc$e42dep) at test-data_tabulate.R:3:3
    2. └─datawizard:::data_tabulate.default(efc$e42dep)
    3.   ├─datawizard::data_rename(...)
    4.   │ └─base::is.data.frame(data)
    5.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
    6.     ├─base::as.data.frame(x[[i]], optional = TRUE)
    7.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
    8.       ├─base::eval(ex)
    9.       │ └─base::eval(ex)
   10.       └─base::data.frame(...)
   11.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   12.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:25:3'): data_tabulate numeric ──────────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(efc$neg_c_7) at test-data_tabulate.R:25:3
    2. └─datawizard:::data_tabulate.default(efc$neg_c_7)
    3.   ├─datawizard::data_rename(...)
    4.   │ └─base::is.data.frame(data)
    5.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
    6.     ├─base::as.data.frame(x[[i]], optional = TRUE)
    7.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
    8.       ├─base::eval(ex)
    9.       │ └─base::eval(ex)
   10.       └─base::data.frame(...)
   11.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   12.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:48:3'): data_tabulate, HTML ────────────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─testthat::expect_s3_class(...) at test-data_tabulate.R:48:3
    2. │ └─testthat::quasi_label(enquo(object))
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─insight::print_html(data_tabulate(efc$c172code))
    5. ├─datawizard::data_tabulate(efc$c172code)
    6. └─datawizard:::data_tabulate.default(efc$c172code)
    7.   ├─datawizard::data_rename(...)
    8.   │ └─base::is.data.frame(data)
    9.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
   10.     ├─base::as.data.frame(x[[i]], optional = TRUE)
   11.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
   12.       ├─base::eval(ex)
   13.       │ └─base::eval(ex)
   14.       └─base::data.frame(...)
   15.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   16.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:60:3'): data_tabulate, tinytable ───────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─insight::display(data_tabulate(efc$c172code), format = "tt")
    2. ├─datawizard::data_tabulate(efc$c172code)
    3. └─datawizard:::data_tabulate.default(efc$c172code)
    4.   ├─datawizard::data_rename(...)
    5.   │ └─base::is.data.frame(data)
    6.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
    7.     ├─base::as.data.frame(x[[i]], optional = TRUE)
    8.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
    9.       ├─base::eval(ex)
   10.       │ └─base::eval(ex)
   11.       └─base::data.frame(...)
   12.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   13.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:71:3'): data_tabulate, weights ─────────────────
  Error in `as.data.frame.numeric(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(efc$e42dep, weights = efc$weights) at test-data_tabulate.R:71:3
    2. └─datawizard:::data_tabulate.default(efc$e42dep, weights = efc$weights)
    3.   ├─datawizard::data_rename(...)
    4.   │ └─base::is.data.frame(data)
    5.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
    6.     ├─base::as.data.frame(x[[i]], optional = TRUE)
    7.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
    8.       ├─base::eval(ex)
    9.       │ └─base::eval(ex)
   10.       └─base::data.frame(...)
   11.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   12.         └─base::as.data.frame.numeric(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:115:3'): data_tabulate data.frame ──────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(efc, c("e16sex", "c172code")) at test-data_tabulate.R:115:3
    2. └─datawizard:::data_tabulate.data.frame(efc, c("e16sex", "c172code"))
    3.   └─base::lapply(...)
    4.     └─datawizard (local) FUN(X[[i]], ...)
    5.       ├─datawizard::data_tabulate(...)
    6.       └─datawizard:::data_tabulate.default(...)
    7.         ├─datawizard::data_rename(...)
    8.         │ └─base::is.data.frame(data)
    9.         └─base::data.frame(freq_table, stringsAsFactors = FALSE)
   10.           ├─base::as.data.frame(x[[i]], optional = TRUE)
   11.           └─base::as.data.frame.table(x[[i]], optional = TRUE)
   12.             ├─base::eval(ex)
   13.             │ └─base::eval(ex)
   14.             └─base::data.frame(...)
   15.               ├─base::as.data.frame(x[[i]], optional = TRUE)
   16.               └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:197:3'): data_tabulate print ───────────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(x, name = "Large Number") at test-data_tabulate.R:197:3
    2. └─datawizard:::data_tabulate.default(x, name = "Large Number")
    3.   ├─datawizard::data_rename(...)
    4.   │ └─base::is.data.frame(data)
    5.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
    6.     ├─base::as.data.frame(x[[i]], optional = TRUE)
    7.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
    8.       ├─base::eval(ex)
    9.       │ └─base::eval(ex)
   10.       └─base::data.frame(...)
   11.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   12.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:217:3'): data_tabulate print ───────────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(efc$e42dep)
    2. └─datawizard:::data_tabulate.default(efc$e42dep)
    3.   ├─datawizard::data_rename(...)
    4.   │ └─base::is.data.frame(data)
    5.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
    6.     ├─base::as.data.frame(x[[i]], optional = TRUE)
    7.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
    8.       ├─base::eval(ex)
    9.       │ └─base::eval(ex)
   10.       └─base::data.frame(...)
   11.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   12.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:223:3'): data_tabulate print multiple ──────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(efc, c("c172code", "e16sex"))
    2. └─datawizard:::data_tabulate.data.frame(efc, c("c172code", "e16sex"))
    3.   └─base::lapply(...)
    4.     └─datawizard (local) FUN(X[[i]], ...)
    5.       ├─datawizard::data_tabulate(...)
    6.       └─datawizard:::data_tabulate.default(...)
    7.         ├─datawizard::data_rename(...)
    8.         │ └─base::is.data.frame(data)
    9.         └─base::data.frame(freq_table, stringsAsFactors = FALSE)
   10.           ├─base::as.data.frame(x[[i]], optional = TRUE)
   11.           └─base::as.data.frame.table(x[[i]], optional = TRUE)
   12.             ├─base::eval(ex)
   13.             │ └─base::eval(ex)
   14.             └─base::data.frame(...)
   15.               ├─base::as.data.frame(x[[i]], optional = TRUE)
   16.               └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:230:3'): data_tabulate big numbers ─────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(x)
    2. └─datawizard:::data_tabulate.default(x)
    3.   ├─datawizard::data_rename(...)
    4.   │ └─base::is.data.frame(data)
    5.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
    6.     ├─base::as.data.frame(x[[i]], optional = TRUE)
    7.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
    8.       ├─base::eval(ex)
    9.       │ └─base::eval(ex)
   10.       └─base::data.frame(...)
   11.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   12.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:238:3'): data_tabulate print multiple, collapse ──
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(efc, c("c172code", "e16sex"), collapse = TRUE)
    2. └─datawizard:::data_tabulate.data.frame(...)
    3.   └─base::lapply(...)
    4.     └─datawizard (local) FUN(X[[i]], ...)
    5.       ├─datawizard::data_tabulate(...)
    6.       └─datawizard:::data_tabulate.default(...)
    7.         ├─datawizard::data_rename(...)
    8.         │ └─base::is.data.frame(data)
    9.         └─base::data.frame(freq_table, stringsAsFactors = FALSE)
   10.           ├─base::as.data.frame(x[[i]], optional = TRUE)
   11.           └─base::as.data.frame.table(x[[i]], optional = TRUE)
   12.             ├─base::eval(ex)
   13.             │ └─base::eval(ex)
   14.             └─base::data.frame(...)
   15.               ├─base::as.data.frame(x[[i]], optional = TRUE)
   16.               └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:245:3'): data_tabulate grouped data.frame ──────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(poorman::group_by(efc, e16sex), "c172code") at test-data_tabulate.R:245:3
    2. └─datawizard:::data_tabulate.grouped_df(...)
    3.   ├─datawizard::data_tabulate(...)
    4.   └─datawizard:::data_tabulate.data.frame(...)
    5.     └─base::lapply(...)
    6.       └─datawizard (local) FUN(X[[i]], ...)
    7.         ├─datawizard::data_tabulate(...)
    8.         └─datawizard:::data_tabulate.default(...)
    9.           ├─datawizard::data_rename(...)
   10.           │ └─base::is.data.frame(data)
   11.           └─base::data.frame(freq_table, stringsAsFactors = FALSE)
   12.             ├─base::as.data.frame(x[[i]], optional = TRUE)
   13.             └─base::as.data.frame.table(x[[i]], optional = TRUE)
   14.               ├─base::eval(ex)
   15.               │ └─base::eval(ex)
   16.               └─base::data.frame(...)
   17.                 ├─base::as.data.frame(x[[i]], optional = TRUE)
   18.                 └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:308:3'): data_tabulate print grouped data ──────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(poorman::group_by(efc, e16sex), "c172code")
    2. └─datawizard:::data_tabulate.grouped_df(...)
    3.   ├─datawizard::data_tabulate(...)
    4.   └─datawizard:::data_tabulate.data.frame(...)
    5.     └─base::lapply(...)
    6.       └─datawizard (local) FUN(X[[i]], ...)
    7.         ├─datawizard::data_tabulate(...)
    8.         └─datawizard:::data_tabulate.default(...)
    9.           ├─datawizard::data_rename(...)
   10.           │ └─base::is.data.frame(data)
   11.           └─base::data.frame(freq_table, stringsAsFactors = FALSE)
   12.             ├─base::as.data.frame(x[[i]], optional = TRUE)
   13.             └─base::as.data.frame.table(x[[i]], optional = TRUE)
   14.               ├─base::eval(ex)
   15.               │ └─base::eval(ex)
   16.               └─base::data.frame(...)
   17.                 ├─base::as.data.frame(x[[i]], optional = TRUE)
   18.                 └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:314:3'): data_tabulate print, collapse groups ──
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(...)
    2. └─datawizard:::data_tabulate.grouped_df(...)
    3.   ├─datawizard::data_tabulate(...)
    4.   └─datawizard:::data_tabulate.data.frame(...)
    5.     └─base::lapply(...)
    6.       └─datawizard (local) FUN(X[[i]], ...)
    7.         ├─datawizard::data_tabulate(...)
    8.         └─datawizard:::data_tabulate.default(...)
    9.           ├─datawizard::data_rename(...)
   10.           │ └─base::is.data.frame(data)
   11.           └─base::data.frame(freq_table, stringsAsFactors = FALSE)
   12.             ├─base::as.data.frame(x[[i]], optional = TRUE)
   13.             └─base::as.data.frame.table(x[[i]], optional = TRUE)
   14.               ├─base::eval(ex)
   15.               │ └─base::eval(ex)
   16.               └─base::data.frame(...)
   17.                 ├─base::as.data.frame(x[[i]], optional = TRUE)
   18.                 └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:322:3'): data_tabulate print, collapse groups, drop levels ──
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(...)
    2. └─datawizard:::data_tabulate.grouped_df(...)
    3.   ├─datawizard::data_tabulate(...)
    4.   └─datawizard:::data_tabulate.data.frame(...)
    5.     └─base::lapply(...)
    6.       └─datawizard (local) FUN(X[[i]], ...)
    7.         ├─datawizard::data_tabulate(...)
    8.         └─datawizard:::data_tabulate.default(...)
    9.           ├─datawizard::data_rename(...)
   10.           │ └─base::is.data.frame(data)
   11.           └─base::data.frame(freq_table, stringsAsFactors = FALSE)
   12.             ├─base::as.data.frame(x[[i]], optional = TRUE)
   13.             └─base::as.data.frame.table(x[[i]], optional = TRUE)
   14.               ├─base::eval(ex)
   15.               │ └─base::eval(ex)
   16.               └─base::data.frame(...)
   17.                 ├─base::as.data.frame(x[[i]], optional = TRUE)
   18.                 └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:334:3'): data_tabulate drop levels ─────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(x, drop_levels = FALSE) at test-data_tabulate.R:334:3
    2. └─datawizard:::data_tabulate.default(x, drop_levels = FALSE)
    3.   ├─datawizard::data_rename(...)
    4.   │ └─base::is.data.frame(data)
    5.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
    6.     ├─base::as.data.frame(x[[i]], optional = TRUE)
    7.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
    8.       ├─base::eval(ex)
    9.       │ └─base::eval(ex)
   10.       └─base::data.frame(...)
   11.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   12.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:347:3'): data_tabulate regex ───────────────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test-data_tabulate.R:347:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─datawizard::data_tabulate(mtcars, select = "arb", regex = TRUE)
    5. └─datawizard:::data_tabulate.data.frame(...)
    6.   └─base::lapply(...)
    7.     └─datawizard (local) FUN(X[[i]], ...)
    8.       ├─datawizard::data_tabulate(...)
    9.       └─datawizard:::data_tabulate.default(...)
   10.         ├─datawizard::data_rename(...)
   11.         │ └─base::is.data.frame(data)
   12.         └─base::data.frame(freq_table, stringsAsFactors = FALSE)
   13.           ├─base::as.data.frame(x[[i]], optional = TRUE)
   14.           └─base::as.data.frame.table(x[[i]], optional = TRUE)
   15.             ├─base::eval(ex)
   16.             │ └─base::eval(ex)
   17.             └─base::data.frame(...)
   18.               ├─base::as.data.frame(x[[i]], optional = TRUE)
   19.               └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:361:3'): data_tabulate exclude/include missing values ──
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(efc$c172code) at test-data_tabulate.R:361:3
    2. └─datawizard:::data_tabulate.default(efc$c172code)
    3.   ├─datawizard::data_rename(...)
    4.   │ └─base::is.data.frame(data)
    5.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
    6.     ├─base::as.data.frame(x[[i]], optional = TRUE)
    7.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
    8.       ├─base::eval(ex)
    9.       │ └─base::eval(ex)
   10.       └─base::data.frame(...)
   11.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   12.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:704:3'): data_tabulate, cross tables, modify structure ──
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(x, "c172code") at test-data_tabulate.R:704:3
    2. └─datawizard:::data_tabulate.grouped_df(x, "c172code")
    3.   ├─datawizard::data_tabulate(...)
    4.   └─datawizard:::data_tabulate.data.frame(...)
    5.     └─base::lapply(...)
    6.       └─datawizard (local) FUN(X[[i]], ...)
    7.         ├─datawizard::data_tabulate(...)
    8.         └─datawizard:::data_tabulate.default(...)
    9.           ├─datawizard::data_rename(...)
   10.           │ └─base::is.data.frame(data)
   11.           └─base::data.frame(freq_table, stringsAsFactors = FALSE)
   12.             ├─base::as.data.frame(x[[i]], optional = TRUE)
   13.             └─base::as.data.frame.table(x[[i]], optional = TRUE)
   14.               ├─base::eval(ex)
   15.               │ └─base::eval(ex)
   16.               └─base::data.frame(...)
   17.                 ├─base::as.data.frame(x[[i]], optional = TRUE)
   18.                 └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:832:3'): data_tabulate, as.data.frame, frequency tables ──
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(mtcars$cyl) at test-data_tabulate.R:832:3
    2. └─datawizard:::data_tabulate.default(mtcars$cyl)
    3.   ├─datawizard::data_rename(...)
    4.   │ └─base::is.data.frame(data)
    5.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
    6.     ├─base::as.data.frame(x[[i]], optional = TRUE)
    7.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
    8.       ├─base::eval(ex)
    9.       │ └─base::eval(ex)
   10.       └─base::data.frame(...)
   11.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   12.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:931:3'): data_tabulate, table methods ──────────
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─datawizard::data_tabulate(mtcars$cyl) at test-data_tabulate.R:931:3
    2. └─datawizard:::data_tabulate.default(mtcars$cyl)
    3.   ├─datawizard::data_rename(...)
    4.   │ └─base::is.data.frame(data)
    5.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
    6.     ├─base::as.data.frame(x[[i]], optional = TRUE)
    7.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
    8.       ├─base::eval(ex)
    9.       │ └─base::eval(ex)
   10.       └─base::data.frame(...)
   11.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   12.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  ── Error ('test-data_tabulate.R:1005:3'): data_tabulate, table methods, only warn if necessary ──
  Error in `as.data.frame.integer(x[[i]], optional = TRUE)`: row names contain missing values
  Backtrace:
       ▆
    1. ├─testthat::expect_message(as.table(data_tabulate(efc$c172code))) at test-data_tabulate.R:1005:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─base::as.table(data_tabulate(efc$c172code))
    8. ├─datawizard::data_tabulate(efc$c172code)
    9. └─datawizard:::data_tabulate.default(efc$c172code)
   10.   ├─datawizard::data_rename(...)
   11.   │ └─base::is.data.frame(data)
   12.   └─base::data.frame(freq_table, stringsAsFactors = FALSE)
   13.     ├─base::as.data.frame(x[[i]], optional = TRUE)
   14.     └─base::as.data.frame.table(x[[i]], optional = TRUE)
   15.       ├─base::eval(ex)
   16.       │ └─base::eval(ex)
   17.       └─base::data.frame(...)
   18.         ├─base::as.data.frame(x[[i]], optional = TRUE)
   19.         └─base::as.data.frame.integer(x[[i]], optional = TRUE)
  
  [ FAIL 22 | WARN 0 | SKIP 82 | PASS 1984 ]
  Error:
  ! Test failures.
  Execution halted