#' Retrieve program names, descriptions and unit costs
#'
#' @export
could_pay_for <- function() {
res <- read_trump_data("alternatives")
res <- res[,-4]
res[complete.cases(res),]
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.