XML'yi R XML kullanarak JSON'a dönüştürme

Question

XML'i kullanarak JSON'a dönüştürmeyi deniyorum. Bu, doğru JSON çıktısını vermiyor. Çevrimiçi çeviriciler farklı formatlanmış bir JSON çıkışı veriyor. Alternatif bir yaklaşımla ilgili öneriler.

kitaplığı (RJSONIO)
kitaplığı (XML)
bir < -xmlToList (xmlfile)
b < -toJSON (a)

Answer 1

Var jsonlite paketini denediniz mi?

doc <- xmlParse(system.file("exampleData", "book.xml", package="XML")) 
a <- xmlToList(doc) 
jsonlite::toJSON(a, pretty=TRUE) 
{ 
    "chapter": { 
    "title": ["XML"], 
    "section": { 
     "title": ["The elements of an XML document"] 
    }, 
    "section.1": { 
     "title": ["Parsing XML"], 
... 

cat(RJSONIO::toJSON(a)) 
{ 
"chapter": { 
"title": "XML", 
"section": { 
"title": "The elements of an XML document" 
}, 
"section": { 
"title": "Parsing XML", 
...