Running ‘testthat.R’ [21s/20s]
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(covidmx)
  Hola! si me usas no te olvides de citarme:
  
  Paquete covidmx:
  + https://rodrigozepeda.github.io/covidmx/authors.html#citation
  
  Datos abiertos (casos):
  + https://www.gob.mx/salud/documentos/datos-abiertos-152127
  
  Datos de variantes (GISAID):
  + https://www.gisaid.org/help/publish-with-data-from-gisaid/
  + https://github.com/RodrigoZepeda/VariantesCovid
  
  Datos de ocupacion hospitalaria (Red IRAG):
  + https://www.gits.igg.unam.mx/red-irag-dashboard/reviewHome#
  + https://github.com/RodrigoZepeda/CapacidadHospitalariaMX
  
  Verifica que estes usando la version mas actual del paquete disponible en:
   https://github.com/RodrigoZepeda/covidmx
  > 
  > test_check("covidmx")
  Starting 2 test processes
  [ FAIL 4 | WARN 27 | SKIP 3 | PASS 40 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (3)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-cfr-chr.R:7:3'): Test cfr and chr ──────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─covidmx::cfr(datos_covid) at test-cfr-chr.R:7:2
    2.   ├─dplyr::mutate(...)
    3.   └─covidmx::casos(...)
    4.     ├─dplyr::ungroup(...)
    5.     ├─dplyr::mutate(...)
    6.     ├─dplyr::full_join(.casos, .grid_casos, by = colnames(.grid_casos))
    7.     └─dplyr:::full_join.data.frame(.casos, .grid_casos, by = colnames(.grid_casos))
    8.       └─dplyr:::join_mutate(...)
    9.         ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   10.         └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   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-casos.R:265:3'): Casos ─────────────────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─covidmx::casos(...) at test-casos.R:265:2
    2.   ├─dplyr::ungroup(...)
    3.   ├─dplyr::mutate(...)
    4.   ├─dplyr::full_join(.casos, .grid_casos, by = colnames(.grid_casos))
    5.   └─dplyr:::full_join.data.frame(.casos, .grid_casos, by = colnames(.grid_casos))
    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-positividad.R:16:3'): Positividad ──────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─covidmx::numero_pruebas(...) at test-positividad.R:16:2
    2.   ├─dplyr::mutate(...)
    3.   ├─dplyr::full_join(.num_pruebas, .grid_casos, by = colnames(.grid_casos))
    4.   └─dplyr:::full_join.data.frame(.num_pruebas, .grid_casos, by = colnames(.grid_casos))
    5.     └─dplyr:::join_mutate(...)
    6.       ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,4]>`)
    7.       └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,4]>`)
    8.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
    9.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   10.             ├─base::withCallingHandlers(...)
   11.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-numero_pruebas.R:267:3'): Num pruebas ──────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─covidmx::numero_pruebas(...) at test-numero_pruebas.R:267:2
    2.   ├─dplyr::mutate(...)
    3.   ├─dplyr::full_join(.num_pruebas, .grid_casos, by = colnames(.grid_casos))
    4.   └─dplyr:::full_join.data.frame(.num_pruebas, .grid_casos, by = colnames(.grid_casos))
    5.     └─dplyr:::join_mutate(...)
    6.       ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,4]>`)
    7.       └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,4]>`)
    8.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
    9.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   10.             ├─base::withCallingHandlers(...)
   11.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  
  [ FAIL 4 | WARN 27 | SKIP 3 | PASS 40 ]
  Error: Test failures
  Execution halted