私は R の初心者です。私の状況は、ネストされた配列を持つ JSON データセットを持っています。JSON ファイルでは、1 つの機関は次のようになります。
{
"website": "www.123.org",
"programs": [
{
"website": "www.111.com",
"contact": "Jim"
},
{
"website": "www.222.com",
"contact": "Han"
}
]
}
各機関には、1 つまたは複数のプログラムがある場合があります。JSON には 100 を超える機関と 200 近くのプログラムがあります。各機関のidと各プログラムのidprを広告したい。最後に、次のような data.frame を取得できることを願っています。
id idpr website websitepr contactpr
1 1 www.123.org www.111.com Jim
1 2 www.123.org www.222.com Han
2 1 www.345.org www.aaa.com Lily
3 1 www.567.org www.bbb.com Jack
3 2 www.567.org www.ccc.com Mike
3 3 www.567.org www.ddd.com Minnie
.........
次のようなネストされたループを記述しようとしました: count<-0 for (n in json_data){ count<-count+1 id<-c(id,count) website<-c(website,n$website) countpr<- 1 for (i in n$programs){ id<-c(id,count) website<-c(website,n$website) idpr<-c(idpr,countpr) websitepr<-c(websitepr,i$website) contactpr<-c(contactpr,i$contact) countpr<-countpr+1 } } しかし、このネストされたループは私が望む結果を与えることができません。私を助けてくれてありがとう！