Nothing
get_reddit_image <-
function(subreddit,
id,
...){
if(inherits(id, 'imgur_image') || inherits(id, 'imgur_gallery_image'))
id <- id$id
out <- imgurGET(paste0('gallery/r/', subreddit, '/', id), ...)
structure(out, class = 'imgur_gallery_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.