Running ‘testthat.R’ [14s/21s]
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/tests.html
  > # * https://testthat.r-lib.org/reference/test_package.html#special-files
  > 
  > library(testthat)
  > library(nestedmodels)
  > 
  > test_check("nestedmodels")
  [ FAIL 15 | WARN 2 | SKIP 2 | PASS 122 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (2)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-augment.R:2:3'): augment.nested_model_fit works ────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─parsnip::linear_reg() %>% parsnip::set_engine("lm") %>% ... at test-augment.R:2:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-fit.R:2:3'): fit.nested_model works ────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─parsnip::linear_reg() %>% parsnip::set_engine("lm") %>% ... at test-fit.R:2:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-fit_xy.R:2:3'): workflows work ─────────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─parsnip::linear_reg() %>% nested() at test-fit_xy.R:2:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-multi_predict.R:4:3'): multi_predict.nested_model_fit works ────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% nested() at test-multi_predict.R:4:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-multi_predict.R:47:3'): multi_predict outer names warnings work ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% nested() at test-multi_predict.R:47:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-nested.R:5:3'): nested works ───────────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─nestedmodels::nested(spec) at test-nested.R:5:2
    2. └─nestedmodels:::nested.model_spec(spec)
    3.   └─nestedmodels:::nested_model(mode, x)
    4.     └─parsnip::new_model_spec(...)
    5.       └─parsnip::spec_is_possible(spec = out)
    6.         ├─dplyr::full_join(...)
    7.         └─dplyr:::full_join.data.frame(...)
    8.           └─dplyr:::join_mutate(...)
    9.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   10.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   12.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   13.                   ├─base::withCallingHandlers(...)
   14.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-nested.R:25:3'): extract_inner_model works ─────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─parsnip::linear_reg() %>% nested() at test-nested.R:25:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-nested_model.R:4:3'): nested_model works ───────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─nestedmodels:::nested_model("regression", normal_model) at test-nested_model.R:4:2
    2.   └─parsnip::new_model_spec(...)
    3.     └─parsnip::spec_is_possible(spec = out)
    4.       ├─dplyr::full_join(...)
    5.       └─dplyr:::full_join.data.frame(...)
    6.         └─dplyr:::join_mutate(...)
    7.           ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
    8.           └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
    9.             └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   10.               └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   11.                 ├─base::withCallingHandlers(...)
   12.                 └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-nested_model_fit.R:2:3'): nested_model_fit works ───────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─parsnip::linear_reg() %>% nested() at test-nested_model_fit.R:2:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-predict.R:2:3'): predict works ─────────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─parsnip::linear_reg() %>% parsnip::set_engine("lm") %>% ... at test-predict.R:2:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-predict.R:42:3'): predict_raw.nested_model_spec works ──────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─parsnip::linear_reg() %>% parsnip::set_engine("lm") %>% ... at test-predict.R:42:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-predict.R:57:3'): outer names warnings work ────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─parsnip::linear_reg() %>% parsnip::set_engine("lm") %>% ... at test-predict.R:57:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-predict.R:74:3'): multivariate predictions work ────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─parsnip::linear_reg() %>% parsnip::set_engine("lm") %>% ... at test-predict.R:74:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-predict.R:88:3'): multivariate workflows work ──────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─parsnip::linear_reg() %>% parsnip::set_engine("lm") %>% ... at test-predict.R:88:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-tidy.R:4:3'): broom methods work ───────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─parsnip::linear_reg() %>% parsnip::set_engine("lm") %>% ... at test-tidy.R:4:2
    2. ├─nestedmodels::nested(.)
    3. └─nestedmodels:::nested.model_spec(.)
    4.   └─nestedmodels:::nested_model(mode, x)
    5.     └─parsnip::new_model_spec(...)
    6.       └─parsnip::spec_is_possible(spec = out)
    7.         ├─dplyr::full_join(...)
    8.         └─dplyr:::full_join.data.frame(...)
    9.           └─dplyr:::join_mutate(...)
   10.             ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   11.             └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   12.               └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.                 └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.                   ├─base::withCallingHandlers(...)
   15.                   └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  
  [ FAIL 15 | WARN 2 | SKIP 2 | PASS 122 ]
  Error: Test failures
  Execution halted