library(data.table)
Grattan_staff <-
fread("./data-raw/Grattan_staff.tsv", fill = TRUE) %>%
.[, email_address := paste0(gsub(" ", ".", name, fixed = TRUE), "@grattan.edu.au")]
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.