JSON working in R

Changed the JSON such that it can be used by R