The goal of appointment is to …
You can install the released version of appointment from CRAN with:
install.packages("appointment")
And the development version from GitHub with:
# install.packages("devtools")
devtools::install_github("stephenbalogun/appointment")
title: “Introduction to the appointment package” output: rmarkdown::html_vignette vignette: > % % % —
library(appointment)
The {appointment} package allows you to be able to set clinic
appointments in a nicely formatted style. It has two functions -
appt_next()
and appt_last
. Both of which take three arguments -
clinic date (c_date), duration of pills (d_pills), and next
appointment date (days). d_pills
and days
are mutually exclusive.
We are going to create some useful scenarios:
clinic_date <- "2021-09-03"
pill_days <- 14
appt_next(clinic_date, pill_days)
#> Your next clinic appointment is on Friday, 17 September 2021
clinic_date <- "2021-09-04"
follow_up_days <- 7
appt_next(clinic_date, follow_up_days)
#> Your next clinic appointment is on Saturday, 11 September 2021
clinic_date <- "2021-09-01"
d_pills <- 20
appt_last(clinic_date, d_pills)
#> Your last clinic appointment was on Thursday, 12 August 2021
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.