Running ‘testthat.R’ [34s/51s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > Sys.setenv("R_TESTS" = "") # see https://github.com/hadley/testthat/issues/86
  > library(testthat)
  > library(checkmate)
  > library(dplyr)
  
  Attaching package: 'dplyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The following objects are masked from 'package:stats':
  
      filter, lag
  
  The following objects are masked from 'package:base':
  
      intersect, setdiff, setequal, union
  
  > library(purrr)
  
  Attaching package: 'purrr'
  
  The following object is masked from 'package:testthat':
  
      is_null
  
  > library(tidyr)
  
  Attaching package: 'tidyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  > # library(pammtools)
  > 
  > test_check("pammtools")
  Loading required package: pammtools
  
  Attaching package: 'pammtools'
  
  The following object is masked from 'package:stats':
  
      filter
  
  [ FAIL 2 | WARN 8 | SKIP 0 | PASS 341 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-cumulative-effect.R:29:3'): LL helpers and as_ped produce equivalent LL windows ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─pammtools::sim_pexp(...) at test-cumulative-effect.R:29:2
    2. │ ├─base::suppressMessages(ped <- ped %>% left_join(reduce(df2, full_join)))
    3. │ │ └─base::withCallingHandlers(...)
    4. │ └─ped %>% left_join(reduce(df2, full_join))
    5. ├─dplyr::left_join(., reduce(df2, full_join))
    6. ├─pammtools:::left_join.ped(., reduce(df2, full_join))
    7. │ └─pammtools:::ped_classes(y)
    8. │   └─class(ped) %in% ...
    9. └─purrr::reduce(df2, full_join)
   10.   └─purrr:::reduce_impl(.x, .f, ..., .init = .init, .dir = .dir)
   11.     ├─dplyr (local) fn(out, elt, ...)
   12.     └─dplyr:::full_join.data.frame(out, elt, ...)
   13.       └─dplyr:::join_mutate(...)
   14.         ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   15.         └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   16.           └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   17.             └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   18.               ├─base::withCallingHandlers(...)
   19.               └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-simple-transform.R:50:3'): Transformation of regular survival data works ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─base::`[<-`(`*tmp*`, 6, "days", value = `<dbl>`) at test-simple-transform.R:50:2
   2. └─tibble:::`[<-.tbl_df`(`*tmp*`, 6, "days", value = `<dbl>`) at test-simple-transform.R:50:2
   3.   └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   4.     └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   5.       ├─base::withCallingHandlers(...)
   6.       └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  
  [ FAIL 2 | WARN 8 | SKIP 0 | PASS 341 ]
  Error: Test failures
  Execution halted