getJsonVars
getJsonObj(session = NULL, input = NULL, access_token = NULL)
session,
session
input,
input
access_token,
access_token
x <- getJsonObj()