make xy coordinates in R, export in JSON