通常のデータフレームをJSONに変換するには？

Question

Stackでさまざまな変換が行われていますが、必要な結果は得られていません。私はExcelファイルからインポートし、操作し、JSONファイルとしてエクスポートしたいデータフレームを持っています。私はこれを試してみました：

exportJson <- toJSON(data) 
    print(exportJson) 
    write(exportJson, "test.json") 
    json_data <- fromJSON(file="test.json") 

私のデータは次のようになります。

 Jill Jimmie Alex Jane 
Jill Jill 0 Jill Jill 
Jimmie 0 Jimmie Jimmie 0 
Alex 0 Alex Alex 0 
Jane Jane Jane Jane 0 

私の出力は次のようになります。私はこのフォーマットのように見えるためにそれを必要とする

 { 
"Jill": ["Jill", 
"0", 
"0", 
"Jane", 
"0", 
"0", 
"0", 
"0", 
"0", 
"0", 
    ... 

：

{ 
"nodes": [ 
    { 
     "id": "id1", 
     "name": "Jill", 
     "val": 1 
    }, 
    { 
     "id": "id2", 
     "name": "Jill", 
     "val": 10 
    }, 
    (...) 
], 
"links": [ 
    { 
     "source": "id1", 
     "target": "id2" 
    }, 
    (...) 
] 
    } 

私はJSON私はRJSONIO、jsonlite、rjsonなどを知っています。私はそれを探ってきました。多分私は明らかな答えを見逃しています。

Answer 1

'。' jqのコマンドは、JSONデータを再フォーマットします。 jqrパッケージを使用する：（空白で）再フォーマット

library(jqr) 

# Unformatted (no whitespace) 
x <- '{"a":1,"b":2,"c":[1,2,3],"d":{"e":1,"f":2}}' 

jq(x, '.') 

出力は

{ 
    "a": 1, 
    "b": 2, 
    "c": [ 
     1, 
     2, 
     3 
    ], 
    "d": { 
     "e": 1, 
     "f": 2 
    } 
} 

jqは、スタンドアロンのユーティリティとして提供されています：あなたはhttps://stedolan.github.io/jq/