#' Read from S3 using a particular function
#'
#' @param FUN a function to parse the data into
#' @param ... arguments for said function
#' @param path path to the s3 file bucket/folder/file.txt
#'
#' @return whatever the function returns
#' @export
#'
#' @examples s3tools:::read_using(FUN=readxl::read_excel, s3_path="alpha-test-team/mpg.xlsx")
read_using <- function(FUN, s3_path, ...){
tmp <- s3_download_temp_file(s3_path)
return(FUN(tmp, ...))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.