all_people <- function() {
api_key <- get_env_var("REDASH_QUERY128")
url <- paste0(
"https://redash.carpentries.org/api/queries/128/results.csv?api_key=",
api_key
)
readr::read_csv(
file = url,
show_col_types = FALSE
) %>%
dplyr::rename(
email = person_email,
pub_name = person_name
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.