The hardware and bandwidth for this mirror is donated by METANET, the Webhosting and Full Service-Cloud Provider.
If you wish to report a bug, or if you are interested in having us mirror your free-software or open-source project, please feel free to contact us at mirror[@]metanet.ch.
Last updated on 2026-05-05 11:51:59 CEST.
| Package | ERROR | WARN | NOTE | OK |
|---|---|---|---|---|
| altdoc | 1 | 12 | ||
| astgrepr | 2 | 11 | ||
| circletyper | 13 | |||
| conductor | 13 | |||
| datawizard | 2 | 11 | ||
| flir | 1 | 12 | ||
| prompter | 13 | |||
| shinyfullscreen | 13 | |||
| spoiler | 13 |
Current CRAN status: NOTE: 1, OK: 12
Version: 0.7.2
Check: for non-standard things in the check directory
Result: NOTE
Found the following files/directories:
‘testpkg402532a43aefd’
Flavor: r-devel-linux-x86_64-fedora-gcc
Current CRAN status: WARN: 2, OK: 11
Version: 0.1.1
Check: whether package can be installed
Result: WARN
Found the following significant warnings:
ld: warning: object file (/Volumes/Builds/packages/sonoma-arm64/results/4.6/astgrepr.Rcheck/00_pkg_src/astgrepr/src/rust/target/release/libastgrepr.a[2](astgrepr-5506178f025efd51.astgrepr.ee8f74833b720cd3-cgu.0.rcgu.o)) was built for newer 'macOS' version (15.0) than being linked (14.0)
ld: warning: object file (/Volumes/Builds/packages/sonoma-arm64/results/4.6/astgrepr.Rcheck/00_pkg_src/astgrepr/src/rust/target/release/libastgrepr.a[3](ea708c7824d36062-parser.o)) was built for newer 'macOS' version (15.0) than being linked (14.0)
ld: warning: object file (/Volumes/Builds/packages/sonoma-arm64/results/4.6/astgrepr.Rcheck/00_pkg_src/astgrepr/src/rust/target/release/libastgrepr.a[4](ea708c7824d36062-scanner.o)) was built for newer 'macOS' version (15.0) than being linked (14.0)
ld: warning: object file (/Volumes/Builds/packages/sonoma-arm64/results/4.6/astgrepr.Rcheck/00_pkg_src/astgrepr/src/rust/target/release/libastgrepr.a[5](98490c8781b409d2-lib.o)) was built for newer 'macOS' version (15.0) than being linked (14.0)
See ‘/Volumes/Builds/packages/sonoma-arm64/results/4.6/astgrepr.Rcheck/00install.out’ for details.
* used C compiler: ‘Apple clang version 17.0.0 (clang-1700.3.19.1)’
* used SDK: ‘MacOSX14.5.sdk’
Flavor: r-release-macos-arm64
Version: 0.1.1
Check: whether package can be installed
Result: WARN
Found the following significant warnings:
ld: warning: object file (./rust/target/release/libastgrepr.a(astgrepr-684d2b16452580b8.astgrepr.662bec521bc058f3-cgu.0.rcgu.o)) was built for newer macOS version (15.0) than being linked (11.0)
ld: warning: object file (./rust/target/release/libastgrepr.a(ea708c7824d36062-parser.o)) was built for newer macOS version (15.0) than being linked (11.0)
ld: warning: object file (./rust/target/release/libastgrepr.a(ea708c7824d36062-scanner.o)) was built for newer macOS version (15.0) than being linked (11.0)
ld: warning: object file (./rust/target/release/libastgrepr.a(98490c8781b409d2-lib.o)) was built for newer macOS version (15.0) than being linked (11.0)
See ‘/Volumes/Builds/packages/big-sur-x86_64/results/4.6/astgrepr.Rcheck/00install.out’ for details.
* used C compiler: ‘Apple clang version 14.0.3 (clang-1403.0.22.14.1)’
* used SDK: ‘MacOSX11.3.1.sdk’
Flavor: r-release-macos-x86_64
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: ERROR: 2, OK: 11
Version: 1.3.1
Check: examples
Result: ERROR
Running examples in ‘datawizard-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: as.prop.table
> ### Title: Convert a crosstable to a frequency or a propensity table
> ### Aliases: as.prop.table as.prop.table.datawizard_crosstab
> ### as.data.frame.datawizard_tables as.table.datawizard_table
>
> ### ** Examples
>
> data(efc)
>
> # Some cross tabulation
> cross <- data_tabulate(efc, select = "e42dep", by = "c172code", proportions = "row")
> cross
e42dep | low level of education | intermediate level of education
-------+------------------------+--------------------------------
1 | 0 (0.0%) | 2 (100.0%)
2 | 0 (0.0%) | 4 (100.0%)
3 | 4 (14.3%) | 16 (57.1%)
4 | 4 (6.3%) | 42 (66.7%)
<NA> | 0 (0.0%) | 2 (66.7%)
-------+------------------------+--------------------------------
Total | 8 | 66
e42dep | high level of education | <NA> | Total
-------+-------------------------+-----------+------
1 | 0 (0.0%) | 0 (0.0%) | 2
2 | 0 (0.0%) | 0 (0.0%) | 4
3 | 6 (21.4%) | 2 (7.1%) | 28
4 | 10 (15.9%) | 7 (11.1%) | 63
<NA> | 0 (0.0%) | 1 (33.3%) | 3
-------+-------------------------+-----------+------
Total | 16 | 10 | 100
>
> # Convert to a propensity table
> as.prop.table(cross)
Removing NA values from frequency table.
[[1]]
low level of education intermediate level of education
1 0.00000000 1.00000000
2 0.00000000 1.00000000
3 0.14285714 0.57142857
4 0.06349206 0.66666667
high level of education
1 0.00000000
2 0.00000000
3 0.21428571
4 0.15873016
>
> # Convert to data.frame
> result <- data_tabulate(efc, "c172code", by = "e16sex")
> as.data.frame(result)
var table
1 c172code c(1, 2, ....
> as.data.frame(result)$table
[[1]]
c172code male female NA
1 1 5 3 0
2 2 32 34 0
3 3 4 12 0
4 <NA> 5 5 0
> as.data.frame(result, add_total = TRUE)$table
[[1]]
c172code male female <NA> Total
1 1 5 3 0 8
2 2 32 34 0 66
3 3 4 12 0 16
4 <NA> 5 5 0 10
5 Total 46 54 0 100
>
> # Convert to a table that can be passed to chisq.test()
>
> out <- data_tabulate(efc, "c172code", by = "e16sex")
> # we need to simplify the output, else we get a list of tables
> tbl <- as.table(out, simplify = TRUE)
Removing NA values from frequency table.
> tbl
male female
1 5 3
2 32 34
3 4 12
> suppressWarnings(chisq.test(tbl))
Pearson's Chi-squared test
data: tbl
X-squared = 3.8802, df = 2, p-value = 0.1437
>
> # apply chisq.test to each table
> out <- data_tabulate(efc, c("c172code", "e16sex"))
Error in as.data.frame.integer(x[[i]], optional = TRUE) :
row names contain missing values
Calls: data_tabulate ... data.frame -> as.data.frame -> as.data.frame.integer
Execution halted
Examples with CPU (user + system) or elapsed time > 5s
user system elapsed
adjust 5.505 0.331 6.007
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.3.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [371s/191s]
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_modify.R:488:1',
'test-data_modify.R:497:1', 'test-data_modify.R:717:1',
'test-data_read.R:8:1', 'test-data_peek.R:31: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_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_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_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-normalize.R:1:1', 'test-ranktransform.R:65: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-smoothness.R:33: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-text_format.R:1:1', 'test-text_format.R:77:1',
'test-standardize_models.R:244:3', 'test-standardize_models.R:291:3',
'test-standardize_models.R:381:3', '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
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.3.1
Check: examples
Result: ERROR
Running examples in 'datawizard-Ex.R' failed
The error most likely occurred in:
> ### Name: as.prop.table
> ### Title: Convert a crosstable to a frequency or a propensity table
> ### Aliases: as.prop.table as.prop.table.datawizard_crosstab
> ### as.data.frame.datawizard_tables as.table.datawizard_table
>
> ### ** Examples
>
> data(efc)
>
> # Some cross tabulation
> cross <- data_tabulate(efc, select = "e42dep", by = "c172code", proportions = "row")
> cross
e42dep | low level of education | intermediate level of education
-------+------------------------+--------------------------------
1 | 0 (0.0%) | 2 (100.0%)
2 | 0 (0.0%) | 4 (100.0%)
3 | 4 (14.3%) | 16 (57.1%)
4 | 4 (6.3%) | 42 (66.7%)
<NA> | 0 (0.0%) | 2 (66.7%)
-------+------------------------+--------------------------------
Total | 8 | 66
e42dep | high level of education | <NA> | Total
-------+-------------------------+-----------+------
1 | 0 (0.0%) | 0 (0.0%) | 2
2 | 0 (0.0%) | 0 (0.0%) | 4
3 | 6 (21.4%) | 2 (7.1%) | 28
4 | 10 (15.9%) | 7 (11.1%) | 63
<NA> | 0 (0.0%) | 1 (33.3%) | 3
-------+-------------------------+-----------+------
Total | 16 | 10 | 100
>
> # Convert to a propensity table
> as.prop.table(cross)
Removing NA values from frequency table.
[[1]]
low level of education intermediate level of education
1 0.00000000 1.00000000
2 0.00000000 1.00000000
3 0.14285714 0.57142857
4 0.06349206 0.66666667
high level of education
1 0.00000000
2 0.00000000
3 0.21428571
4 0.15873016
>
> # Convert to data.frame
> result <- data_tabulate(efc, "c172code", by = "e16sex")
> as.data.frame(result)
var table
1 c172code c(1, 2, ....
> as.data.frame(result)$table
[[1]]
c172code male female NA
1 1 5 3 0
2 2 32 34 0
3 3 4 12 0
4 <NA> 5 5 0
> as.data.frame(result, add_total = TRUE)$table
[[1]]
c172code male female <NA> Total
1 1 5 3 0 8
2 2 32 34 0 66
3 3 4 12 0 16
4 <NA> 5 5 0 10
5 Total 46 54 0 100
>
> # Convert to a table that can be passed to chisq.test()
>
> out <- data_tabulate(efc, "c172code", by = "e16sex")
> # we need to simplify the output, else we get a list of tables
> tbl <- as.table(out, simplify = TRUE)
Removing NA values from frequency table.
> tbl
male female
1 5 3
2 32 34
3 4 12
> suppressWarnings(chisq.test(tbl))
Pearson's Chi-squared test
data: tbl
X-squared = 3.8802, df = 2, p-value = 0.1437
>
> # apply chisq.test to each table
> out <- data_tabulate(efc, c("c172code", "e16sex"))
Error in as.data.frame.integer(x[[i]], optional = TRUE) :
row names contain missing values
Calls: data_tabulate ... data.frame -> as.data.frame -> as.data.frame.integer
Execution halted
Flavor: r-devel-windows-x86_64
Version: 1.3.1
Check: tests
Result: ERROR
Running 'testthat.R' [160s]
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 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.
> test-standardize-data.R:
Error:
! testthat subprocess exited in file 'test-standardize-data.R'.
Caused by error:
! R session crashed with exit code -1073741819
Backtrace:
▆
1. └─testthat::test_check("datawizard")
2. └─testthat::test_dir(...)
3. └─testthat:::test_files(...)
4. └─testthat:::test_files_parallel(...)
5. ├─withr::with_dir(...)
6. │ └─base::force(code)
7. ├─testthat::with_reporter(...)
8. │ └─base::tryCatch(...)
9. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
12. └─testthat:::parallel_event_loop_chunky(queue, reporters, ".")
13. └─queue$poll(Inf)
14. └─base::lapply(...)
15. └─testthat (local) FUN(X[[i]], ...)
16. └─private$handle_error(msg, i)
17. └─cli::cli_abort(...)
18. └─rlang::abort(...)
Execution halted
Flavor: r-devel-windows-x86_64
Current CRAN status: ERROR: 1, OK: 12
Version: 0.6.0
Check: tests
Result: ERROR
Running 'spelling.R' [0s]
Running 'testthat.R' [10m]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview
> # * https://testthat.r-lib.org/articles/special-files.html
>
> library(testthat)
> library(flir)
Attaching package: 'flir'
The following object is masked from 'package:utils':
fix
>
> test_check("flir")
Starting 2 test processes.
> test-absolute_path.R: v Created './flir'.
> test-absolute_path.R: i Use `add_new_rule()` to create a custom rule.
> test-add_new_rule.R: v Created './flir'.
> test-add_new_rule.R: i Use `add_new_rule()` to create a custom rule.
> test-add_new_rule.R: v Created './flir/rules/custom/foobar.yml'.
> test-add_new_rule.R: i Add "foobar" to 'flir/config.yml' to be able to use it.
> test-add_new_rule.R: v Created './flir'.
> test-add_new_rule.R: i Use `add_new_rule()` to create a custom rule.
> test-add_new_rule.R: v Created './flir/rules/custom/foobar.yml'.
> test-add_new_rule.R: v Created './flir'.
> test-add_new_rule.R: i Use `add_new_rule()` to create a custom rule.
> test-add_new_rule.R: v Created './flir/rules/custom/foobar.yml' and './flir/rules/custom/foobar2.yml'.
> test-add_new_rule.R: i Add "foobar" and "foobar2" to 'flir/config.yml' to be able to use it.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-custom_linters.R: v Created './flir'.
> test-custom_linters.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-custom_linters.R: v Created './flir'.
> test-custom_linters.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-config_yml.R: v Created './flir'.
> test-config_yml.R: i Use `add_new_rule()` to create a custom rule.
> test-export_new_rule.R: v Created './inst/flir/rules/foobar.yml'.
> test-export_new_rule.R: v Created './inst/flir/rules/foobar2.yml'.
> test-export_new_rule.R: v Created './inst/flir/rules/foobar.yml'.
> test-export_new_rule.R: v Created './flir'.
> test-export_new_rule.R: i Use `add_new_rule()` to create a custom rule.
> test-export_new_rule.R: v Created './inst/flir/rules/foobar.yml' and './inst/flir/rules/foobar2.yml'.
> test-path.R: v Created './flir'.
> test-path.R: i Use `add_new_rule()` to create a custom rule.
> test-setup_flir.R: v Created './flir'.
> test-setup_flir.R: i Use `add_new_rule()` to create a custom rule.
> test-setup_flir.R: v Created './flir'.
> test-setup_flir.R: i Use `add_new_rule()` to create a custom rule.
> test-vector_logic.R:
Error:
! testthat subprocess exited in file 'test-vector_logic.R'.
Caused by error:
! R session crashed with exit code -1073741819
Backtrace:
▆
1. └─testthat::test_check("flir")
2. └─testthat::test_dir(...)
3. └─testthat:::test_files(...)
4. └─testthat:::test_files_parallel(...)
5. ├─withr::with_dir(...)
6. │ └─base::force(code)
7. ├─testthat::with_reporter(...)
8. │ └─base::tryCatch(...)
9. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
12. └─testthat:::parallel_event_loop_chunky(queue, reporters, ".")
13. └─queue$poll(Inf)
14. └─base::lapply(...)
15. └─testthat (local) FUN(X[[i]], ...)
16. └─private$handle_error(msg, i)
17. └─cli::cli_abort(...)
18. └─rlang::abort(...)
Execution halted
Flavor: r-oldrel-windows-x86_64
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: OK: 13
These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.