Update toJSON.R