Adds indentiation to a JSON string
Arguments
- json
string of JSON
- ...
other argments passed to to_json
Examples
df <- data.frame(id = 1:10, val = rnorm(10))
js <- to_json( df )
pretty_json(js)
#> [
#> {
#> "id": 1,
#> "val": -1.863011492068328
#> },
#> {
#> "id": 2,
#> "val": -0.5220125147454544
#> },
#> {
#> "id": 3,
#> "val": -0.05260190995387954
#> },
#> {
#> "id": 4,
#> "val": 0.5429963426611403
#> },
#> {
#> "id": 5,
#> "val": -0.9140748272599284
#> },
#> {
#> "id": 6,
#> "val": 0.4681544204505332
#> },
#> {
#> "id": 7,
#> "val": 0.3629512558649863
#> },
#> {
#> "id": 8,
#> "val": -1.3045435450347769
#> },
#> {
#> "id": 9,
#> "val": 0.7377763212550469
#> },
#> {
#> "id": 10,
#> "val": 1.8885049292345455
#> }
#> ]
## can also use directly on an R object
pretty_json( df )
#> [
#> {
#> "id": 1,
#> "val": -1.863011492068328
#> },
#> {
#> "id": 2,
#> "val": -0.5220125147454544
#> },
#> {
#> "id": 3,
#> "val": -0.05260190995387954
#> },
#> {
#> "id": 4,
#> "val": 0.5429963426611403
#> },
#> {
#> "id": 5,
#> "val": -0.9140748272599284
#> },
#> {
#> "id": 6,
#> "val": 0.4681544204505332
#> },
#> {
#> "id": 7,
#> "val": 0.3629512558649863
#> },
#> {
#> "id": 8,
#> "val": -1.3045435450347769
#> },
#> {
#> "id": 9,
#> "val": 0.7377763212550469
#> },
#> {
#> "id": 10,
#> "val": 1.8885049292345455
#> }
#> ]