R/get_random_images.r

In imguR: An Imgur.com API Client Package

Defines functions get_random_images

Documented in get_random_images

get_random_images <- 
function(page = 0, ...){
    stopifnot(is.numeric(as.numeric(page)))
    out <- imgurGET(paste0('gallery/random/random/',
                           ifelse(!is.null(page), page, NULL)),
                    ...)
    out <- lapply(out, `class<-`, 'imgur_gallery_image')
    structure(out, class = 'imgur_gallery_album')
}

Try the imguR package in your browser