整頓されたデータからjson文字列を作成するには

Question

こんにちは私はmongo DBにインポートする必要があるCSVファイルを用意しました。

私のデータはすでに整頓されていますが、私はインポートすることができますjsonオブジェクトを作成するためにそれを整頓したいと思います。

例えば

：私のようなJSON文字列のリストを作成したいwoudl

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

：

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

これは、単純な問題であるはずが、それはすべてGoogleの検索結果が話していることになりますました。代わりにjsonを整頓したdata.frameにします。

Answer 1

あなたは

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 
#  } 
#  ] 
# }