github_api:

In Xiaolin-Jiang/lab5webAPI: lab5 webAPI

Usage

github_api(path)

Arguments

path

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (path) 
{
    url <- modify_url("https://api.github.com", path = path)
    resp <- GET(url)
    if (http_type(resp) != "application/json") {
        stop("API did not return json", call. = FALSE)
    }
    parsed <- jsonlite::fromJSON(content(resp, "text"), simplifyVector = FALSE)
    if (http_error(resp)) {
        stop(sprintf("GitHub API request failed [%s]\n%s\n<%s>", 
            status_code(resp), parsed$message, parsed$documentation_url), 
            call. = FALSE)
    }
    structure(list(content = parsed, path = path, response = resp), 
        class = "github_api")
  }

Xiaolin-Jiang/lab5webAPI documentation built on Dec. 18, 2021, 7:22 p.m.