library(rjson)
data <- fromJSON('{ "foo": 1, "bar": [10, "apples"] }')
data