Running ‘testthat.R’ [22s/37s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(MazamaTimeSeries)
  > 
  > test_check("MazamaTimeSeries")
  [ FAIL 4 | WARN 4 | SKIP 0 | PASS 176 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-mts_combine.R:28:3'): simple combination works ─────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test-mts_combine.R:28:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─mts_combine(mts_1, mts_2) %>% mts_extractData()
    5. ├─MazamaTimeSeries::mts_extractData(.)
    6. │ └─"data" %in% names(mts)
    7. ├─MazamaTimeSeries::mts_combine(mts_1, mts_2)
    8. │ └─data %>% dplyr::full_join(AB_data, by = "datetime") %>% ...
    9. ├─dplyr::arrange(., .data$datetime)
   10. ├─dplyr::full_join(., AB_data, by = "datetime")
   11. └─dplyr:::full_join.data.frame(., AB_data, by = "datetime")
   12.   └─dplyr:::join_mutate(...)
   13.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   14.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   15.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   16.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   17.           ├─base::withCallingHandlers(...)
   18.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-mts_combine.R:62:3'): gaps and overlaps are supported ──────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_identical(...) at test-mts_combine.R:62:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─mts_combine(mts_1, mts_2) %>% mts_extractData() %>% ...
    5. ├─dplyr::pull(., .data$datetime)
    6. ├─MazamaTimeSeries::mts_extractData(.)
    7. │ └─"data" %in% names(mts)
    8. ├─MazamaTimeSeries::mts_combine(mts_1, mts_2)
    9. │ └─data %>% dplyr::full_join(AB_data, by = "datetime") %>% ...
   10. ├─dplyr::arrange(., .data$datetime)
   11. ├─dplyr::full_join(., AB_data, by = "datetime")
   12. └─dplyr:::full_join.data.frame(., AB_data, by = "datetime")
   13.   └─dplyr:::join_mutate(...)
   14.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   15.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   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-mts_combine.R:89:3'): later-is-better is supported ─────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─MazamaTimeSeries::mts_combine(mts_1, mts_2) at test-mts_combine.R:89:2
    2. │ └─data %>% dplyr::full_join(AB_data, by = "datetime") %>% ...
    3. ├─dplyr::arrange(., .data$datetime)
    4. ├─dplyr::full_join(., AB_data, by = "datetime")
    5. └─dplyr:::full_join.data.frame(., AB_data, by = "datetime")
    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-sts_summarize.R:49:3'): na.rm and minCount work ────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─base::`[<-`(`*tmp*`, 1:6, 2, value = `<lgl>`) at test-sts_summarize.R:49:2
   2. └─tibble:::`[<-.tbl_df`(`*tmp*`, 1:6, 2, value = `<lgl>`) at test-sts_summarize.R:49: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 4 | WARN 4 | SKIP 0 | PASS 176 ]
  Error: Test failures
  Execution halted