Running ‘testthat.R’ [89s/336s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(nflfastR)
  > 
  > test_check("nflfastR")
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-columns.R:7:3): Columns identical across all 3 possibilities ────
  Error: Timeout was reached: [github.com] Resolving timed out after 10000 milliseconds
  Backtrace:
       █
    1. ├─nflfastR::fast_scraper(game_ids[1], source = "nfl", pp = F) test-columns.R:7:2
    2. │ ├─base::suppressWarnings(...)
    3. │ │ └─base::withCallingHandlers(...)
    4. │ └─`%>%`(...)
    5. ├─nflfastR:::select_variables(.)
    6. │ ├─base::suppressWarnings(...)
    7. │ │ └─base::withCallingHandlers(...)
    8. │ └─`%>%`(...)
    9. ├─dplyr::select(...)
   10. ├─nflfastR:::add_series_data(.)
   11. │ └─`%>%`(...)
   12. ├─dplyr::select(., -"row", -"tmp_result", -"new_series")
   13. ├─dplyr::ungroup(.)
   14. ├─dplyr::mutate(...)
   15. ├─dplyr::group_by(., .data$game_id, .data$series)
   16. ├─dplyr::mutate(...)
   17. ├─dplyr::group_by(., .data$game_id)
   18. ├─dplyr::mutate(...)
   19. ├─dplyr::group_by(., .data$game_id, .data$game_half)
   20. ├─nflfastR:::add_drive_results(.)
   21. │ └─`%>%`(...)
   22. ├─dplyr::select(., -"row", -"new_drive", -"tmp_result")
   23. ├─dplyr::ungroup(.)
   24. ├─dplyr::mutate(...)
   25. ├─dplyr::group_by(., .data$game_id, .data$fixed_drive)
   26. ├─dplyr::mutate(...)
   27. ├─dplyr::group_by(., .data$game_id)
   28. ├─dplyr::mutate(...)
   29. ├─dplyr::group_by(., .data$game_id, .data$game_half)
   30. ├─nflfastR:::add_cp(.)
   31. │ └─nflfastR:::prepare_cp_data(pbp)
   32. │   └─`%>%`(...)
   33. ├─dplyr::select(...)
   34. ├─dplyr::mutate(...)
   35. ├─nflfastR:::add_air_yac_wp(.)
   36. │ ├─base::nrow(pbp %>% dplyr::filter(!is.na(.data$air_yards)))
   37. │ └─pbp %>% dplyr::filter(!is.na(.data$air_yards))
   38. ├─dplyr::filter(., !is.na(.data$air_yards))
   39. ├─nflfastR:::add_wp(.)
   40. │ └─pbp %>% add_wp_variables()
   41. ├─nflfastR:::add_wp_variables(.)
   42. │ └─base::nrow(pbp_data)
   43. ├─nflfastR:::add_air_yac_ep(.)
   44. │ ├─base::nrow(pbp %>% dplyr::filter(!is.na(.data$air_yards)))
   45. │ └─pbp %>% dplyr::filter(!is.na(.data$air_yards))
   46. ├─dplyr::filter(., !is.na(.data$air_yards))
   47. ├─nflfastR:::add_ep(.)
   48. │ └─pbp %>% add_ep_variables()
   49. ├─nflfastR:::add_ep_variables(.)
   50. │ └─nflfastR:::get_preds(pbp_data)
   51. │   ├─base::as.data.frame(...)
   52. │   ├─base::matrix(...)
   53. │   ├─stats::predict(ep_model, as.matrix(pbp %>% ep_model_select()))
   54. │   ├─xgboost:::predict.xgb.Booster(ep_model, as.matrix(pbp %>% ep_model_select()))
   55. │   ├─base::as.matrix(pbp %>% ep_model_select())
   56. │   └─pbp %>% ep_model_select()
   57. ├─nflfastR:::ep_model_select(.)
   58. │ └─`%>%`(...)
   59. ├─dplyr::select(...)
   60. ├─nflfastR:::add_nflscrapr_mutations(.)
   61. │ └─`%>%`(...)
   62. ├─nflfastR:::make_model_mutations(.)
   63. │ └─`%>%`(...)
   64. ├─dplyr::mutate(...)
   65. ├─dplyr::mutate(., game_id = as.character(.data$game_id))
   66. ├─dplyr::ungroup(.)
   67. ├─dplyr::filter(., !is.na(.data$desc), .data$desc != "", !is.na(.data$qtr))
   68. ├─dplyr::rename(...)
   69. ├─dplyr::mutate(...)
   70. ├─dplyr::group_by(., .data$game_id)
   71. ├─dplyr::ungroup(.)
   72. ├─dplyr::mutate(...)
   73. ├─dplyr::group_by(., .data$game_id, .data$game_half)
   74. ├─dplyr::mutate(...)
   75. ├─dplyr::ungroup(.)
   76. ├─dplyr::arrange(...)
   77. ├─dplyr::group_by(., .data$game_id)
   78. ├─dplyr::mutate(...)
   79. ├─dplyr::ungroup(.)
   80. ├─dplyr::slice(., 1)
   81. ├─dplyr::group_by(...)
   82. ├─dplyr::mutate(., index = 1:dplyr::n())
   83. └─nflfastR:::add_game_data(., source)
   84.   └─base::tryCatch(...)
   85.     └─base:::tryCatchList(expr, classes, parentenv, handlers)
   86.       ├─base:::tryCatchOne(...)
   87.       │ └─base:::doTryCatch(return(expr), name, parentenv, handler)
   88.       └─base:::tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
   89.         └─base:::tryCatchOne(expr, names, parentenv, handlers[[1L]])
   90.           └─value[[3L]](cond)
  
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 16 ]
  Error: Test failures
  Execution halted