if (FALSE) { # requireNamespace("RSQLite", quietly = TRUE)
conn <- SCDB::get_connection(drv = RSQLite::SQLite())
dplyr::copy_to(conn, data.frame(birth = as.Date("2001-04-03"), "test_age")) |>
dplyr::mutate(first_birthday = !!add_years("birth", 1, conn))
DBI::dbDisconnect(conn)
}
Run the code above in your browser using DataLab