Nothing
recaptureImage <- function(file_path_input, fname, size_x, size_y){
#PREPARE THE IMAGE
img_path <- file.path(file_path_input, fname)
img <- imager::load.image(img_path)
image <- grDevices::as.raster(imager::resize(img, size_x = size_x, size_y = size_y))
return(image)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.