i <- imgur()
hist(rnorm(20))
img <- imgur_off(i)
create_album(id = img,
title = 'My first Imgur album',
description = 'A simple album',
privacy = 'hidden',
layout = 'grid',
cover_id = img)
Run the code above in your browser using DataLab