How create json string from tidy data

Question

Hi I have a set CSV files that I need to import into mongo DB.

my data is already tidy, I want to untidy it to create json object I can import.

For example:

client, receipt, total
1       101      $10
1       102      $11
2       201      $10

I woudl like to create list of json strings like:

list:
[1]
{  
   "client":1,
   "receipts":[  
      {  
         "receipt":101,
         "charge":10
      },
      {  
         "receipt":102,
         "charge":11
      }
   ]
}
[2]
{  
   "client":2,
   "receipts":[  
      {  
         "receipt":201,
         "charge":10
      }
   ]
}

This was supposed to be a simple problem but it looks that all google results are talking about getting json into a tidy data.frame instead.

lukeA · Accepted Answer · 2017-08-07 22:05:12Z

1

You could do

df<-read.table(header=T, text="client receipt charge
1       101      10
1       102      11
2       201      10")
library(jsonlite)
library(tidyverse)
df %>% 
  nest(-client, .key = receipts) %>% 
  split(.$client) %>% 
  map(~toJSON(unbox(.x), pretty=TRUE)) 
# $`1`
# {
#     "client": 1,
#     "receipts": [
#       {
#         "receipt": 101,
#         "charge": 10
#       },
#       {
#         "receipt": 102,
#         "charge": 11
#       }
#     ]
#   } 
# 
# $`2`
# {
#     "client": 2,
#     "receipts": [
#       {
#         "receipt": 201,
#         "charge": 10
#       }
#     ]
#   }

answered Aug 7, 2017 at 22:05

lukeA

54.4k5 gold badges102 silver badges102 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

sgp667 Over a year ago

Luke works like charm, thank you. I had a similar idea but you nailed it.

Collectives™ on Stack Overflow

How create json string from tidy data

1 Answer 1

1 Comment

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Related