require(RJSONIO)
somedata1<-list(a=1,b='w')
fromJSON(toJSON(somedata1))
somedata2<-list(a=1,b=2)
fromJSON(toJSON(somedata2))
somedata3<-list(a='v',b='w')
fromJSON(toJSON(somedata3))
fromJSON(toJSON(somedata3),simplify=StrictNumeric)
fromJSON(toJSON(somedata2),simplify=FALSE)
fromJSON(toJSON(somedata3),simplifyWithNames = FALSE)
fromJSON(toJSON(somedata2),simplifyWithNames = FALSE)
RJSON "/ R-". simplify simplifyWithNames. , :
require(RJSONIO)
resultsURL='http://ergast.com/api/f1/2012/1/results.json'
results.data.json=fromJSON(resultsURL)
results.data.json$MRData$RaceTable$Races[[1]]$Results[[8]]$Driver['familyName']
results.data.json=fromJSON(resultsURL,simplify=FALSE)
results.data.json$MRData$RaceTable$Races[[1]]$Results[[8]]$Driver$familyName
results.data.json=fromJSON(resultsURL,simplify=StrictNumeric)
results.data.json$MRData$RaceTable$Races[[1]]$Results[[8]]$Driver$familyName
results.data.json=fromJSON(resultsURL,simplifyWithNames = FALSE)
results.data.json$MRData$RaceTable$Races[[1]]$Results[[8]]$Driver$familyName