library(tidyverse)
library(clock)
dat_cov <- expand_grid(
year = 2021,
month = 1:3,
id = LETTERS[1:3]
) |>
mutate(
date = ISOdate(year = year, month = month, day = 1),
long = runif(n()),
lat = runif(n()),
temp = rpois(n = n(), 25),
rainfall = runif(n = n())
) |>
select(-year,
-month) |>
mutate(lag_date = add_months(x = date,
n = -1),
.after = date)
dat_lookup <- expand_grid(
year = 2020:2021,
month = 1:12,
id = LETTERS[1:3]
) |>
mutate(
date = ISOdate(year = year, month = month, day = 1),
temp = rpois(n = n(), 25),
rainfall = runif(n = n())
) |>
select(-year,
-month)
dat_lookup
#> # A tibble: 72 × 4
#> id date temp rainfall
#> <chr> <dttm> <int> <dbl>
#> 1 A 2020-01-01 12:00:00 14 0.585
#> 2 B 2020-01-01 12:00:00 24 0.142
#> 3 C 2020-01-01 12:00:00 29 0.464
#> 4 A 2020-02-01 12:00:00 15 0.852
#> 5 B 2020-02-01 12:00:00 27 0.618
#> 6 C 2020-02-01 12:00:00 21 0.688
#> 7 A 2020-03-01 12:00:00 27 0.0708
#> 8 B 2020-03-01 12:00:00 22 0.485
#> 9 C 2020-03-01 12:00:00 26 0.746
#> 10 A 2020-04-01 12:00:00 24 0.986
#> # … with 62 more rows
dat_cov
#> # A tibble: 9 × 7
#> id date lag_date long lat temp rainfall
#> <chr> <dttm> <dttm> <dbl> <dbl> <int> <dbl>
#> 1 A 2021-01-01 12:00:00 2020-12-01 12:00:00 0.761 0.855 30 0.441
#> 2 B 2021-01-01 12:00:00 2020-12-01 12:00:00 0.684 0.970 31 0.961
#> 3 C 2021-01-01 12:00:00 2020-12-01 12:00:00 0.947 0.436 24 0.573
#> 4 A 2021-02-01 12:00:00 2021-01-01 12:00:00 0.735 0.168 33 0.854
#> 5 B 2021-02-01 12:00:00 2021-01-01 12:00:00 0.540 0.0866 28 0.0777
#> 6 C 2021-02-01 12:00:00 2021-01-01 12:00:00 0.575 0.0345 29 0.230
#> 7 A 2021-03-01 12:00:00 2021-02-01 12:00:00 0.123 0.233 32 0.880
#> 8 B 2021-03-01 12:00:00 2021-02-01 12:00:00 0.238 0.0780 25 0.0198
#> 9 C 2021-03-01 12:00:00 2021-02-01 12:00:00 0.482 0.319 21 0.272
add_months(x = dat_cov$date[1], n = -1)
#> [1] "2020-12-01 12:00:00 GMT"
Created on 2022-08-09 by the reprex package (v2.0.1)
Session info
sessioninfo::session_info()
#> ─ Session info ───────────────────────────────────────────────────────────────
#> setting value
#> version R version 4.2.0 (2022-04-22)
#> os macOS Monterey 12.3.1
#> system aarch64, darwin20
#> ui X11
#> language (EN)
#> collate en_AU.UTF-8
#> ctype en_AU.UTF-8
#> tz Australia/Perth
#> date 2022-08-09
#> pandoc 2.18 @ /Applications/RStudio.app/Contents/MacOS/quarto/bin/tools/ (via rmarkdown)
#>
#> ─ Packages ───────────────────────────────────────────────────────────────────
#> package * version date (UTC) lib source
#> assertthat 0.2.1 2019-03-21 [1] CRAN (R 4.2.0)
#> backports 1.4.1 2021-12-13 [1] CRAN (R 4.2.0)
#> broom 0.8.0 2022-04-13 [1] CRAN (R 4.2.0)
#> cellranger 1.1.0 2016-07-27 [1] CRAN (R 4.2.0)
#> cli 3.3.0.9000 2022-06-15 [1] Github (r-lib/cli@31a5db5)
#> clock * 0.6.0 2021-12-02 [1] CRAN (R 4.2.0)
#> colorspace 2.0-3 2022-02-21 [1] CRAN (R 4.2.0)
#> crayon 1.5.1 2022-03-26 [1] CRAN (R 4.2.0)
#> DBI 1.1.2 2021-12-20 [1] CRAN (R 4.2.0)
#> dbplyr 2.1.1 2021-04-06 [1] CRAN (R 4.2.0)
#> digest 0.6.29 2021-12-01 [1] CRAN (R 4.2.0)
#> dplyr * 1.0.9 2022-04-28 [1] CRAN (R 4.2.0)
#> ellipsis 0.3.2 2021-04-29 [1] CRAN (R 4.2.0)
#> evaluate 0.15 2022-02-18 [1] CRAN (R 4.2.0)
#> fansi 1.0.3 2022-03-24 [1] CRAN (R 4.2.0)
#> fastmap 1.1.0 2021-01-25 [1] CRAN (R 4.2.0)
#> forcats * 0.5.1 2021-01-27 [1] CRAN (R 4.2.0)
#> fs 1.5.2 2021-12-08 [1] CRAN (R 4.2.0)
#> generics 0.1.2 2022-01-31 [1] CRAN (R 4.2.0)
#> ggplot2 * 3.3.6 2022-05-03 [1] CRAN (R 4.2.0)
#> glue 1.6.2 2022-02-24 [1] CRAN (R 4.2.0)
#> gtable 0.3.0 2019-03-25 [1] CRAN (R 4.2.0)
#> haven 2.5.0 2022-04-15 [1] CRAN (R 4.2.0)
#> highr 0.9 2021-04-16 [1] CRAN (R 4.2.0)
#> hms 1.1.1 2021-09-26 [1] CRAN (R 4.2.0)
#> htmltools 0.5.2 2021-08-25 [1] CRAN (R 4.2.0)
#> httr 1.4.3 2022-05-04 [1] CRAN (R 4.2.0)
#> jsonlite 1.8.0 2022-02-22 [1] CRAN (R 4.2.0)
#> knitr 1.39 2022-04-26 [1] CRAN (R 4.2.0)
#> lifecycle 1.0.1 2021-09-24 [1] CRAN (R 4.2.0)
#> lubridate 1.8.0 2021-10-07 [1] CRAN (R 4.2.0)
#> magrittr 2.0.3 2022-03-30 [1] CRAN (R 4.2.0)
#> modelr 0.1.8 2020-05-19 [1] CRAN (R 4.2.0)
#> munsell 0.5.0 2018-06-12 [1] CRAN (R 4.2.0)
#> pillar 1.7.0 2022-02-01 [1] CRAN (R 4.2.0)
#> pkgconfig 2.0.3 2019-09-22 [1] CRAN (R 4.2.0)
#> purrr * 0.3.4 2020-04-17 [1] CRAN (R 4.2.0)
#> R.cache 0.15.0 2021-04-30 [1] CRAN (R 4.2.0)
#> R.methodsS3 1.8.1 2020-08-26 [1] CRAN (R 4.2.0)
#> R.oo 1.24.0 2020-08-26 [1] CRAN (R 4.2.0)
#> R.utils 2.11.0 2021-09-26 [1] CRAN (R 4.2.0)
#> R6 2.5.1 2021-08-19 [1] CRAN (R 4.2.0)
#> readr * 2.1.2 2022-01-30 [1] CRAN (R 4.2.0)
#> readxl 1.4.0 2022-03-28 [1] CRAN (R 4.2.0)
#> reprex 2.0.1 2021-08-05 [1] CRAN (R 4.2.0)
#> rlang 1.0.4 2022-07-12 [1] CRAN (R 4.2.0)
#> rmarkdown 2.14 2022-04-25 [1] CRAN (R 4.2.0)
#> rstudioapi 0.13 2020-11-12 [1] CRAN (R 4.2.0)
#> rvest 1.0.2 2021-10-16 [1] CRAN (R 4.2.0)
#> scales 1.2.0 2022-04-13 [1] CRAN (R 4.2.0)
#> sessioninfo 1.2.2 2021-12-06 [1] CRAN (R 4.2.0)
#> stringi 1.7.6 2021-11-29 [1] CRAN (R 4.2.0)
#> stringr * 1.4.0 2019-02-10 [1] CRAN (R 4.2.0)
#> styler 1.7.0 2022-03-13 [1] CRAN (R 4.2.0)
#> tibble * 3.1.7 2022-05-03 [1] CRAN (R 4.2.0)
#> tidyr * 1.2.0 2022-02-01 [1] CRAN (R 4.2.0)
#> tidyselect 1.1.2 2022-02-21 [1] CRAN (R 4.2.0)
#> tidyverse * 1.3.1 2021-04-15 [1] CRAN (R 4.2.0)
#> tzdb 0.3.0 2022-03-28 [1] CRAN (R 4.2.0)
#> utf8 1.2.2 2021-07-24 [1] CRAN (R 4.2.0)
#> vctrs 0.4.1 2022-04-13 [1] CRAN (R 4.2.0)
#> withr 2.5.0 2022-03-03 [1] CRAN (R 4.2.0)
#> xfun 0.31 2022-05-10 [1] CRAN (R 4.2.0)
#> xml2 1.3.3 2021-11-30 [1] CRAN (R 4.2.0)
#> yaml 2.3.5 2022-02-21 [1] CRAN (R 4.2.0)
#>
#> [1] /Library/Frameworks/R.framework/Versions/4.2-arm64/Resources/library
#>
#> ──────────────────────────────────────────────────────────────────────────────