Nothing
#' Compute the months between two purchase dates
#'
#' @param a starting date
#' @param b ending date
#'
#' Description here
f_intMonths = function(a, b) {
i <- lubridate::interval(a,b) %/% months(1)
return(i + 1)}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.