fulcrum-api-to-r.R

# API
## install packages
install.packages(c("httr", "jsonlite", "lubridate"))
library(httr)
library(jsonlite)
options(stringsAsFactors = FALSE)

## set variables to get all records per form id
baseurl  <- "https://api.fulcrumapp.com"
path <- "/api/v2/"
form <- "records.json?form_id="
formid <- "yourformid"
XApiToken = "yourapitoken"

req <-
    GET(
        url = paste0(baseurl, path, form,formid),
        add_headers(`X-ApiToken` = XApiToken),
        accept_json()
    )
stop_for_status(req)
head(req$content)
r.json<-fromJSON(content(req,type="text"),flatten = T,simplifyDataFrame = T)