Running ‘testthat.R’ [137s/204s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > 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
  
  > 
  > test_check("dplyr")
  [ FAIL 8 | WARN 270 | SKIP 305 | PASS 2747 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (305)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test-filter.R:301:3'): hybrid function row_number does not trigger warning in filter (#3750) ──
  `out` is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  ── Error ('test-group-by.R:484:3'): joins maintain the .drop attribute (#4061) ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─dplyr::full_join(df1, df2, by = "f1") at test-group-by.R:484:2
   2. └─dplyr:::full_join.data.frame(df1, df2, by = "f1")
   3.   └─dplyr:::join_mutate(...)
   4.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   5.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   6.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   7.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.           ├─base::withCallingHandlers(...)
   9.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-grouped-df.R:52:3'): $<-, [[<-, and [<- update grouping data if needed ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-grouped-df.R:52:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─dplyr::group_data(`[<-`(gf, 1, "x", value = 4))
    5. ├─base::`[<-`(gf, 1, "x", value = 4)
    6. ├─dplyr:::`[<-.grouped_df`(gf, 1, "x", value = 4)
    7. ├─base::NextMethod()
    8. └─tibble:::`[<-.tbl_df`(gf, 1, "x", value = 4)
    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]])
  ── Failure ('test-join-by.R:236:3'): nicely catches missing arguments when wrapped ──
  `fn(a)` did not throw the expected error.
  ── Error ('test-join.R:15:3'): mutating joins preserve row and column order of x ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─dplyr::right_join(df1, df2, by = "a") at test-join.R:15:2
   2. └─dplyr:::right_join.data.frame(df1, df2, by = "a")
   3.   └─dplyr:::join_mutate(...)
   4.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   5.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   6.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   7.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.           ├─base::withCallingHandlers(...)
   9.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-join.R:53:3'): keys are coerced to symmetric type ──────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─dplyr::full_join(df1, df2, by = c("x", "y")) at test-join.R:53:2
   2. └─dplyr:::full_join.data.frame(df1, df2, by = c("x", "y"))
   3.   └─dplyr:::join_mutate(...)
   4.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   5.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   6.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   7.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.           ├─base::withCallingHandlers(...)
   9.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-join.R:190:3'): joins don't match NA when na_matches = 'never' (#2033) ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-join.R:190:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─dplyr::full_join(dat1, dat3, by = "name", na_matches = "never")
    5. └─dplyr:::full_join.data.frame(dat1, dat3, by = "name", na_matches = "never")
    6.   └─dplyr:::join_mutate(...)
    7.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
    8.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
    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-join.R:463:3'): joins respect zero length groups ───────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-join.R:463:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─dplyr::group_size(right_join(df1, df2, by = "f", multiple = "all"))
    5. ├─dplyr::right_join(df1, df2, by = "f", multiple = "all")
    6. └─dplyr:::right_join.data.frame(df1, df2, by = "f", multiple = "all")
    7.   └─dplyr:::join_mutate(...)
    8.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
    9.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   10.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.           ├─base::withCallingHandlers(...)
   13.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  
  [ FAIL 8 | WARN 270 | SKIP 305 | PASS 2747 ]
  Error: Test failures
  Execution halted