Skip to content

Commit

Permalink
resolve notes from devtools::check()
Browse files Browse the repository at this point in the history
  • Loading branch information
papsti committed Sep 28, 2023
1 parent 364c4cb commit e4a1145
Show file tree
Hide file tree
Showing 3 changed files with 9 additions and 4 deletions.
2 changes: 1 addition & 1 deletion DESCRIPTION
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
Package: EPACmodel
Title: Use the Early Pandemic Age-structured Compartmental (EPAC) model.
Title: Use the Early Pandemic Age-structured Compartmental (EPAC) model
Version: 1.1.0
Authors@R: c(
person("Irena", "Papst", , "irena.papst@phac-aspc.gc.ca", role = c("aut", "cre")),
Expand Down
7 changes: 6 additions & 1 deletion R/globals.R
Original file line number Diff line number Diff line change
@@ -1 +1,6 @@
utils::globalVariables(c("time", "value"))
utils::globalVariables(c(
"time", "value",
"age", "age_group",
"age_susceptible", "age_infectious",
"count"
))
4 changes: 2 additions & 2 deletions R/helpers_five-year-age-groups.R
Original file line number Diff line number Diff line change
Expand Up @@ -54,11 +54,11 @@ mk_contact_pars <- function(
names_to = "age_infectious"
)
|> dplyr::mutate(dplyr::across(
starts_with("age"),
dplyr::starts_with("age"),
\(x) as.numeric(x)
))
|> dplyr::mutate(dplyr::across(
starts_with("age"),
dplyr::starts_with("age"),
\(x) cut(x, breaks = c(age.group.lower, Inf),
include.lowers = TRUE, right = FALSE)
))
Expand Down

0 comments on commit e4a1145

Please sign in to comment.