Nothing
favorite_image <-
function(id, ...){
if(inherits(id, 'imgur_image'))
id <- id$id
out <- imgurPOST(paste0('image/', id, '/favorite'), ...)
structure(out, class = 'imgur_basic')
}
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.