## visit.R: visit a submitted Rmd file
#' Visit a submitted Rmd file in the script editor
#'
#' @param x : tibble with submission information
#' @param id : \code{sub_id} number
#' @export
visit <- function(x, id) {
x %>% dplyr::filter(sub_id == id) %>%
dplyr::pull(fullpath) %>%
file.edit()
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.