Skip to content

Commit

Permalink
fix
Browse files Browse the repository at this point in the history
  • Loading branch information
dshemetov committed Oct 15, 2024
1 parent b59ed63 commit 7c67a30
Show file tree
Hide file tree
Showing 6 changed files with 14 additions and 6 deletions.
6 changes: 5 additions & 1 deletion .Rbuildignore
Original file line number Diff line number Diff line change
Expand Up @@ -17,4 +17,8 @@
^DEVELOPMENT.md$
man-roxygen
^.venv$
^sandbox.R$
^sandbox.R$
^README.Rmd$
^README_cache$
^pkgdown-watch.R$
^scrap.Rmd$
2 changes: 1 addition & 1 deletion DESCRIPTION
Original file line number Diff line number Diff line change
Expand Up @@ -39,7 +39,6 @@ Imports:
genlasso,
ggplot2,
glue,
here,
lifecycle (>= 1.0.1),
lubridate,
magrittr,
Expand All @@ -56,6 +55,7 @@ Imports:
Suggests:
devtools,
epidatr,
here,
knitr,
outbreaks,
readr,
Expand Down
1 change: 1 addition & 0 deletions NAMESPACE
Original file line number Diff line number Diff line change
Expand Up @@ -59,6 +59,7 @@ export(as_tsibble)
export(autoplot)
export(clone)
export(complete)
export(deprecated_quo_is_present)
export(detect_outlr)
export(detect_outlr_rm)
export(detect_outlr_stl)
Expand Down
5 changes: 3 additions & 2 deletions R/slide.R
Original file line number Diff line number Diff line change
Expand Up @@ -79,15 +79,16 @@
#' # The same as above, but unpacking using an unnamed data.frame with a formula
#' jhu_csse_daily_subset %>%
#' epi_slide(
#' data.frame(
#' ~ data.frame(
#' cases_7sd = sd(.x$cases, na.rm = TRUE),
#' cases_7dav = mean(.x$cases, na.rm = TRUE)
#' ),
#' .window_size = 7
#' ) %>%
#' dplyr::select(geo_value, time_value, cases, cases_7sd, cases_7dav)
#'
#' # The same as above, but packing using a named data.frame with a formula
#' # The same as above, but packing using a named data.frame with a tidy evaluation
#' # expression
#' jhu_csse_daily_subset %>%
#' epi_slide(
#' slide_packed = data.frame(
Expand Down
1 change: 1 addition & 0 deletions R/utils.R
Original file line number Diff line number Diff line change
Expand Up @@ -836,6 +836,7 @@ list2var <- function(x) {
#'
#' @importFrom lifecycle deprecated
#'
#' @export
#' @keywords internal
deprecated_quo_is_present <- function(quo) {
if (!rlang::is_quosure(quo)) {
Expand Down
5 changes: 3 additions & 2 deletions man/epi_slide.Rd

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

0 comments on commit 7c67a30

Please sign in to comment.