In R, how do I link parameter with set of values from JSON data? -

In R, how do I link parameter with set of values from JSON data? -

the next json data

"parameters": [ { "parametername": "intervaltoignoreduringtransitions", "values": [ { "createdbytimestamp": "2014-09-22t14:39:25.717z", "createdbyuser": "tis", "modifiedbyuser": "", "analyticparametervalueid": 502, "analyticparameternameid": 502, "analyticparametervalue": "0" } ] }, { "parametername": "daterange", "values": [ { "createdbytimestamp": "2014-09-22t14:38:25.297z", "createdbyuser": "tis", "modifiedbyuser": "", "analyticparametervalueid": 501, "analyticparameternameid": 501, "analyticparametervalue": "12" } ] } ]

creates next data.frame construction in r

'data.frame': 2 obs. of 2 variables: $ parametername: chr "intervaltoignoreduringtransitions" "daterange" $ values :list of 2 ..$ :'data.frame': 1 obs. of 6 variables: .. ..$ createdbytimestamp : chr "2014-09-22t14:39:25.717z" .. ..$ createdbyuser : chr "tis" .. ..$ modifiedbyuser : chr "" .. ..$ analyticparametervalueid: int 502 .. ..$ analyticparameternameid : int 502 .. ..$ analyticparametervalue : chr "0" ..$ :'data.frame': 1 obs. of 6 variables: .. ..$ createdbytimestamp : chr "2014-09-22t14:38:25.297z" .. ..$ createdbyuser : chr "tis" .. ..$ modifiedbyuser : chr "" .. ..$ analyticparametervalueid: int 501 .. ..$ analyticparameternameid : int 501 .. ..$ analyticparametervalue : chr "12"

is there anyway simple way link parameternames respective values?

for example, if data.frame called df, i'd utilize df$daterange$analyticparametervalue homecoming "12".

this should it:

library(jsonlite) tmp <- fromjson('{"parameters": [ { "parametername": "intervaltoignoreduringtransitions", "values": [ { "createdbytimestamp": "2014-09-22t14:39:25.717z", "createdbyuser": "tis", "modifiedbyuser": "", "analyticparametervalueid": 502, "analyticparameternameid": 502, "analyticparametervalue": "0" } ] }, { "parametername": "daterange", "values": [ { "createdbytimestamp": "2014-09-22t14:38:25.297z", "createdbyuser": "tis", "modifiedbyuser": "", "analyticparametervalueid": 501, "analyticparameternameid": 501, "analyticparametervalue": "12" } ] } ]}') dat <- tmp$parameters$values names(dat) <- tmp$parameters$parametername dat$daterange$analyticparametervalue ## [1] "12"

json r