CRAN Package Check Results for Package dm

Last updated on 2023-03-20 04:52:59 CET.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 1.0.5 OK
r-devel-linux-x86_64-debian-gcc 1.0.5 16.29 371.06 387.35 ERROR
r-devel-linux-x86_64-fedora-clang 1.0.5 745.96 OK
r-devel-linux-x86_64-fedora-gcc 1.0.5 735.49 OK
r-devel-windows-x86_64 1.0.5 276.00 513.00 789.00 OK
r-patched-linux-x86_64 1.0.5 25.42 558.04 583.46 OK
r-release-linux-x86_64 1.0.4 16.02 597.94 613.96 OK
r-release-macos-arm64 1.0.5 132.00 OK
r-release-macos-x86_64 1.0.5 187.00 OK
r-release-windows-x86_64 1.0.5 225.00 455.00 680.00 OK
r-oldrel-macos-arm64 1.0.5 124.00 OK
r-oldrel-macos-x86_64 1.0.5 199.00 OK
r-oldrel-windows-ix86+x86_64 1.0.4 36.00 523.00 559.00 NOTE

Check Details

Version: 1.0.5
Check: examples
Result: ERROR
    Running examples in ‘dm-Ex.R’ failed
    The error most likely occurred in:
    
    > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
    > ### Name: dm_add_fk
    > ### Title: Add foreign keys
    > ### Aliases: dm_add_fk
    >
    > ### ** Examples
    >
    > ## Don't show:
    > if (rlang::is_installed("nycflights13") && rlang::is_installed("DiagrammeR")) (if (getRversion() >= "3.4") withAutoprint else force)({ # examplesIf
    + ## End(Don't show)
    + nycflights_dm <- dm(
    + planes = nycflights13::planes,
    + flights = nycflights13::flights,
    + weather = nycflights13::weather
    + )
    +
    + nycflights_dm %>%
    + dm_draw()
    +
    + # Create foreign keys:
    + nycflights_dm %>%
    + dm_add_pk(planes, tailnum) %>%
    + dm_add_fk(flights, tailnum, planes) %>%
    + dm_add_pk(weather, c(origin, time_hour)) %>%
    + dm_add_fk(flights, c(origin, time_hour), weather) %>%
    + dm_draw()
    +
    + # Keys can be checked during creation:
    + try(
    + nycflights_dm %>%
    + dm_add_pk(planes, tailnum) %>%
    + dm_add_fk(flights, tailnum, planes, check = TRUE)
    + )
    + ## Don't show:
    + }) # examplesIf
    > nycflights_dm <- dm(planes = nycflights13::planes, flights = nycflights13::flights,
    + weather = nycflights13::weather)
    > nycflights_dm %>% dm_draw()
    > nycflights_dm %>% dm_add_pk(planes, tailnum) %>% dm_add_fk(flights, tailnum,
    + planes) %>% dm_add_pk(weather, c(origin, time_hour)) %>% dm_add_fk(flights, c(origin,
    + time_hour), weather) %>% dm_draw()
    Error in vectbl_assign(x[[j]], i, recycled_value[[j]]) :
     DLL requires the use of native symbols
    Calls: <Anonymous> ... tbl_subassign_row -> withCallingHandlers -> vectbl_assign
    Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc

Version: 1.0.5
Check: tests
Result: ERROR
     Running ‘testthat.R’ [231s/193s]
    Running the tests in ‘tests/testthat.R’ failed.
    Complete output:
     > library(testthat)
     >
     > # Need to use qualified call, this is checked in helper-print.R
     > testthat::test_check("dm")
     Loading required package: dm
    
     Attaching package: 'dm'
    
     The following object is masked from 'package:stats':
    
     filter
    
     Starting 2 test processes
     [ FAIL 13 | WARN 0 | SKIP 204 | PASS 1246 ]
    
     ══ Skipped tests ═══════════════════════════════════════════════════════════════
     • COMPOUND (1)
     • FIXME (2)
     • FIXME: Unstable on GHA? (1)
     • Need to think about it (1)
     • Needs https://github.com/tidyverse/dbplyr/pull/649 (2)
     • On CRAN (164)
     • Slow test. To run, set CI=true (6)
     • dm argument (1)
     • does not work on `df` (1)
     • empty test (2)
     • keyed = TRUE (1)
     • not testing deprecated cdm_nycflights13(): test too slow (1)
     • not testing deprecated learning from DB: test too slow (1)
     • only works on `db` (1)
     • only works on `mssql` (4)
     • only works on `mssql`, `postgres` (4)
     • only works on `mssql`, `postgres`, `maria` (4)
     • only works on `postgres` (2)
     • only works on `postgres`, `mssql` (2)
     • only works on `postgres`, `mssql`, `sqlite` (1)
     • only works on `postgres`, `sqlite`, `mssql`, `maria` (1)
     • only works on `sqlite` (1)
    
     ══ Failed tests ════════════════════════════════════════════════════════════════
     ── Error ('test-dplyr.R:265:3'): basic test: 'join()'-methods for `zoomed.dm` work ──
     Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
     Backtrace:
     ▆
     1. ├─dm:::expect_equivalent_tbl(...) at test-dplyr.R:265:2
     2. │ └─dm:::harmonize_tbl(tbl_1, ...) at tests/testthat/helper-expectations.R:82:2
     3. │ └─tbl %>% collect() %>% mutate(...) %>% arrange_if_no_list() at tests/testthat/helper-expectations.R:70:2
     4. ├─dm:::arrange_if_no_list(.)
     5. │ └─base::inherits(tbl, "tbl_dbi") at tests/testthat/helper-expectations.R:62:2
     6. ├─dplyr::mutate(., ...)
     7. ├─dplyr::collect(.)
     8. ├─full_join(dm_zoomed(), tf_1) %>% dm_update_zoomed() %>% ...
     9. ├─dm:::tbl_impl(., "tf_2")
     10. │ └─dm:::dm_get_def(dm, quiet = quiet)
     11. │ └─dm:::check_dm(x)
     12. │ └─dm::is_dm(x)
     13. ├─dm::dm_update_zoomed(.)
     14. │ └─dm:::check_zoomed(dm)
     15. │ └─dm:::check_dm(dm)
     16. │ └─dm::is_dm(x)
     17. ├─dplyr::full_join(dm_zoomed(), tf_1)
     18. └─dm:::full_join.dm_zoomed(dm_zoomed(), tf_1)
     19. ├─dplyr::full_join(...)
     20. └─dplyr:::full_join.data.frame(...)
     21. └─dplyr:::join_mutate(...)
     22. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
     23. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
     24. └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
     25. └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
     26. ├─base::withCallingHandlers(...)
     27. └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
     ── Error ('test-flatten.R:93:3'): `dm_flatten_to_tbl()` does the right things for 'full_join()' ──
     Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
     Backtrace:
     ▆
     1. ├─dm:::expect_message_obj(...) at test-flatten.R:93:2
     2. │ ├─testthat::expect_message(...)
     3. │ │ └─testthat:::expect_condition_matching(...)
     4. │ │ └─testthat:::quasi_capture(...)
     5. │ │ ├─testthat (local) .capture(...)
     6. │ │ │ └─base::withCallingHandlers(...)
     7. │ │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
     8. │ └─rlang::eval_tidy(dm_flatten_to_tbl(dm_for_flatten(), fact, .join = full_join))
     9. └─dm::dm_flatten_to_tbl(dm_for_flatten(), fact, .join = full_join)
     10. └─dm:::dm_flatten_to_tbl_impl(...)
     11. └─purrr::reduce2(...)
     12. └─purrr:::reduce2_impl(.x, .y, .f, ..., .init = .init, .left = TRUE)
     13. └─dm (local) .f(out, .x[[x_i]], .y[[y_i]], ...)
     14. ├─dplyr (local) join(..1, ..2, by = ..3)
     15. └─dplyr:::full_join.data.frame(..1, ..2, by = ..3)
     16. └─dplyr:::join_mutate(...)
     17. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
     18. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
     19. └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
     20. └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
     21. ├─base::withCallingHandlers(...)
     22. └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
     ── Error ('test-flatten.R:131:3'): `dm_flatten_to_tbl()` does the right things for 'right_join()' ──
     Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
     Backtrace:
     ▆
     1. ├─dm:::expect_equivalent_tbl(...) at test-flatten.R:131:2
     2. │ └─dm:::harmonize_tbl(tbl_1, ...) at tests/testthat/helper-expectations.R:82:2
     3. │ └─tbl %>% collect() %>% mutate(...) %>% arrange_if_no_list() at tests/testthat/helper-expectations.R:70:2
     4. ├─dm:::arrange_if_no_list(.)
     5. │ └─base::inherits(tbl, "tbl_dbi") at tests/testthat/helper-expectations.R:62:2
     6. ├─dplyr::mutate(., ...)
     7. ├─dplyr::collect(.)
     8. ├─dm:::expect_message_obj(...)
     9. │ ├─testthat::expect_message(...)
     10. │ │ └─testthat:::expect_condition_matching(...)
     11. │ │ └─testthat:::quasi_capture(...)
     12. │ │ ├─testthat (local) .capture(...)
     13. │ │ │ └─base::withCallingHandlers(...)
     14. │ │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
     15. │ └─rlang::eval_tidy(...)
     16. ├─dm:::expect_warning_obj(...)
     17. │ ├─testthat::expect_warning(...)
     18. │ │ └─testthat:::expect_condition_matching(...)
     19. │ │ └─testthat:::quasi_capture(...)
     20. │ │ ├─testthat (local) .capture(...)
     21. │ │ │ └─base::withCallingHandlers(...)
     22. │ │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
     23. │ └─rlang::eval_tidy(dm_flatten_to_tbl(dm_for_flatten(), fact, .join = right_join))
     24. └─dm::dm_flatten_to_tbl(dm_for_flatten(), fact, .join = right_join)
     25. └─dm:::dm_flatten_to_tbl_impl(...)
     26. └─purrr::reduce2(...)
     27. └─purrr:::reduce2_impl(.x, .y, .f, ..., .init = .init, .left = TRUE)
     28. └─dm (local) .f(out, .x[[x_i]], .y[[y_i]], ...)
     29. ├─dplyr (local) join(..1, ..2, by = ..3)
     30. └─dplyr:::right_join.data.frame(..1, ..2, by = ..3)
     31. └─dplyr:::join_mutate(...)
     32. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
     33. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
     34. └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
     35. └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
     36. ├─base::withCallingHandlers(...)
     37. └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
     ── Error ('test-flatten.R:212:3'): `dm_flatten_to_tbl(.recursive = TRUE)` does the right things ──
     Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
     Backtrace:
     ▆
     1. ├─dm:::expect_equivalent_tbl(...) at test-flatten.R:212:2
     2. │ └─dm:::harmonize_tbl(tbl_1, ...) at tests/testthat/helper-expectations.R:82:2
     3. │ └─tbl %>% collect() %>% mutate(...) %>% arrange_if_no_list() at tests/testthat/helper-expectations.R:70:2
     4. ├─dm:::arrange_if_no_list(.)
     5. │ └─base::inherits(tbl, "tbl_dbi") at tests/testthat/helper-expectations.R:62:2
     6. ├─dplyr::mutate(., ...)
     7. ├─dplyr::collect(.)
     8. └─dm::dm_flatten_to_tbl(...)
     9. └─dm:::dm_flatten_to_tbl_impl(...)
     10. └─purrr::reduce2(...)
     11. └─purrr:::reduce2_impl(.x, .y, .f, ..., .init = .init, .left = TRUE)
     12. └─dm (local) .f(out, .x[[x_i]], .y[[y_i]], ...)
     13. ├─dplyr (local) join(..1, ..2, by = ..3)
     14. └─dplyr:::full_join.data.frame(..1, ..2, by = ..3)
     15. └─dplyr:::join_mutate(...)
     16. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
     17. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
     18. └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
     19. └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
     20. ├─base::withCallingHandlers(...)
     21. └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
     ── Error ('test-draw-dm.R:128:3'): output ──────────────────────────────────────
     Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
     Backtrace:
     ▆
     1. ├─dm:::expect_snapshot_diagram(...) at test-draw-dm.R:128:2
     2. │ └─diagram %>% DiagrammeRsvg::export_svg() %>% writeLines(path) at tests/testthat/helper-expectations.R:112:2
     3. ├─base::writeLines(., path)
     4. ├─DiagrammeRsvg::export_svg(.)
     5. ├─dm_nycflights13() %>% dm_draw(column_types = TRUE)
     6. ├─dm::dm_draw(., column_types = TRUE)
     7. │ └─dm:::dm_get_data_model(dm, column_types)
     8. │ └─... %>% as.data.frame()
     9. ├─base::as.data.frame(.)
     10. ├─dplyr::distinct(.)
     11. ├─dplyr::select(., -key_fk)
     12. ├─dplyr::mutate(., key = coalesce(key, key_fk, 0L))
     13. ├─dplyr::full_join(...)
     14. ├─dplyr::full_join(., keys_fk, by = c("table", "column"))
     15. ├─dplyr::full_join(., keys_pk, by = c("table", "column"))
     16. └─dplyr:::full_join.data.frame(., keys_pk, by = c("table", "column"))
     17. └─dplyr:::join_mutate(...)
     18. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
     19. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
     20. └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
     21. └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
     22. ├─base::withCallingHandlers(...)
     23. └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
     ── Error ('test-rows-dm.R:12:3'): dm_rows_insert() ─────────────────────────────
     `{ ... }` threw an unexpected error.
     Message: object 'flights_new' not found
     Class: simpleError/error/condition
     ── Error ('test-rows-dm.R:92:3'): dm_rows_update() ─────────────────────────────
     `{ ... }` threw an unexpected error.
     Message: DLL requires the use of native symbols
     Class: simpleError/error/condition
     ── Error ('test-rows-dm.R:154:3'): dm_rows_truncate() ──────────────────────────
     `{ ... }` threw an unexpected error.
     Message: DLL requires the use of native symbols
     Class: simpleError/error/condition
     ── Error ('test-datamodelr-code.R:4:3'): datamodel-code for drawing ────────────
     `{ ... }` threw an unexpected error.
     Message: DLL requires the use of native symbols
     Class: simpleError/error/condition
     ── Error ('test-datamodelr-code.R:12:3'): snapshot test for datamodelr code ────
     Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
     Backtrace:
     ▆
     1. ├─dm:::dm_get_data_model(dm) at test-datamodelr-code.R:12:2
     2. │ └─... %>% as.data.frame()
     3. ├─base::as.data.frame(.)
     4. ├─dplyr::distinct(.)
     5. ├─dplyr::select(., -key_fk)
     6. ├─dplyr::mutate(., key = coalesce(key, key_fk, 0L))
     7. ├─dplyr::full_join(...)
     8. ├─dplyr::full_join(., keys_fk, by = c("table", "column"))
     9. ├─dplyr::full_join(., keys_pk, by = c("table", "column"))
     10. └─dplyr:::full_join.data.frame(., keys_pk, by = c("table", "column"))
     11. └─dplyr:::join_mutate(...)
     12. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
     13. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
     14. └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
     15. └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
     16. ├─base::withCallingHandlers(...)
     17. └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
     ── Error ('test-dm_nest_tbl.R:17:3'): `dm_pack_tbl()`, `dm_unpack_tbl()`, `dm_nest_tbl()`, `dm_unnest_tbl()` work ──
     `{ ... }` threw an unexpected error.
     Message: object 'dm_packed_nested_unnested_unpacked' not found
     Class: simpleError/error/condition
     ── Error ('test-dm_wrap.R:5:3'): `dm_wrap_tbl()` and `dm_unwrap_tbl()` work ────
     Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
     Backtrace:
     ▆
     1. └─dm::dm_wrap_tbl(dm1, tf_4) at test-dm_wrap.R:5:2
     2. └─purrr::reduce2(...)
     3. └─purrr:::reduce2_impl(.x, .y, .f, ..., .init = .init, .left = TRUE)
     4. └─dm (local) .f(out, .x[[x_i]], .y[[y_i]], ...)
     5. ├─rlang::exec(f, dm, table)
     6. └─dm::dm_nest_tbl(`<dm>`, "tf_2")
     7. ├─base::`[<-`(`*tmp*`, def$table == parent_name, , value = `<tibble[,11]>`)
     8. └─tibble:::`[<-.tbl_df`(`*tmp*`, def$table == parent_name, , value = `<tibble[,11]>`)
     9. └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
     10. └─tibble:::tbl_subassign_row(xo, i, value, i_arg, value_arg, call)
     11. ├─base::withCallingHandlers(...)
     12. └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
     ── Error ('test-dm_wrap.R:37:3'): `dm_wrap_tbl()` and `dm_unwrap_tbl()` round trip ──
     Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
     Backtrace:
     ▆
     1. ├─dm::dm_unwrap_tbl(dm_wrap_tbl(dm, tf_1), dm) at test-dm_wrap.R:37:2
     2. │ ├─... %>% purrr::discard(~ nrow(.) == 0)
     3. │ └─dm::dm_get_tables(dm)
     4. │ └─dm:::check_not_zoomed(x)
     5. │ └─dm:::check_dm(dm)
     6. │ └─dm::is_dm(x)
     7. ├─purrr::discard(., ~nrow(.) == 0)
     8. │ └─purrr:::where_if(.x, .p, ...)
     9. │ └─purrr:::map_(.x, .p, ..., .type = "logical", .purrr_error_call = .purrr_error_call)
     10. │ └─purrr:::vctrs_vec_compat(.x, .purrr_user_env)
     11. ├─base::unlist(., recursive = FALSE)
     12. ├─purrr::imap(., dm_unwrap_tbl_plan)
     13. │ └─purrr::map2(.x, vec_index(.x), .f, ...)
     14. │ └─purrr:::map2_("list", .x, .y, .f, ..., .progress = .progress)
     15. │ └─purrr:::vctrs_vec_compat(.x, .purrr_user_env)
     16. └─dm::dm_wrap_tbl(dm, tf_1)
     17. └─purrr::reduce2(...)
     18. └─purrr:::reduce2_impl(.x, .y, .f, ..., .init = .init, .left = TRUE)
     19. └─dm (local) .f(out, .x[[x_i]], .y[[y_i]], ...)
     20. ├─rlang::exec(f, dm, table)
     21. └─dm::dm_nest_tbl(`<dm>`, "tf_5")
     22. ├─base::`[<-`(`*tmp*`, def$table == parent_name, , value = `<tibble[,11]>`)
     23. └─tibble:::`[<-.tbl_df`(`*tmp*`, def$table == parent_name, , value = `<tibble[,11]>`)
     24. └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
     25. └─tibble:::tbl_subassign_row(xo, i, value, i_arg, value_arg, call)
     26. ├─base::withCallingHandlers(...)
     27. └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
    
     [ FAIL 13 | WARN 0 | SKIP 204 | PASS 1246 ]
     Error: Test failures
     Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc

Version: 1.0.4
Check: dependencies in R code
Result: NOTE
    Initiating curl with CURL_SSL_BACKEND: openssl
Flavor: r-oldrel-windows-ix86+x86_64