2014-07-09 16 views
19

Ho creato un file JSON e devo essere in grado di condividere il file via email con altri collaboratori. Tuttavia, sebbene siano disponibili numerosi argomenti sulla gestione degli oggetti JSON nello spazio di lavoro R, non esistono praticamente risorse che discutano su come esportare effettivamente un oggetto JSON in un file .JSON.Salvataggio di un oggetto JSON su file.JSON

Ecco un semplice esempio:

list1 <- vector(mode="list", length=2) 
    list1[[1]] <- c("a", "b", "c") 
    list1[[2]] <- c(1, 2, 3) 

exportJson <- toJSON(list1) 

## Save the JSON to file 
save(exportJson, file="export.JSON") 

## Attempt to read in the JSON 
library("rjson") 
json_data <- fromJSON(file="export.JSON") 

La riga finale, tenta di leggere nel file JSON, si traduce in un errore: "Errore nel fromJSON (file = "export.JSON"): carattere non previsto ' R '"

Ovviamente la funzione save() non è la strada da percorrere, ma dopo una lunga ricerca su google, non ho trovato nulla che indichi come esportare il JSON in un file. Qualsiasi aiuto sarebbe molto apprezzato.

+2

Basta usare 'write (exportJson, file = "export.JSON")' – jdharrison

risposta

27

È possibile utilizzare write:

library(RJSONIO) 
list1 <- vector(mode="list", length=2) 
list1[[1]] <- c("a", "b", "c") 
list1[[2]] <- c(1, 2, 3) 

exportJson <- toJSON(list1) 
> exportJson 
[1] "[\n [ \"a\", \"b\", \"c\" ],\n[  1,  2,  3 ] \n]" 
write(exportJson, "test.json") 
library("rjson") 
json_data <- fromJSON(file="test.json") 
> json_data 
[[1]] 
[1] "a" "b" "c" 

[[2]] 
[1] 1 2 3 
+0

Grazie, ha funzionato perfettamente =) –

+0

Felice di aiutare ... – jdharrison

+0

Sto usando questo metodo ma scrive il file in una riga. Qualche idea su come posso superarla? Puoi vedere anche in questo link: http://stackoverflow.com/questions/33958711/changing-values-in-json-file-through-r –

Problemi correlati