Konvertieren von Datum in R in JSON-Format

Question

Ich möchte Datum in JSON-Format konvertieren. Der R all.elasticitiesdata.frame sieht wie folgt aus:

PREVIOUS_START_DATE PREVIOUS_PRICE PREVIOUS_QUANTITY PRE_No_OF_WEEKS CURRENT_START_DATE 
     2015-12-20   2.79   20680.5    2   2015-12-20   
     2016-01-17   2.29   21049.5    4   2016-01-17   
     2016-01-31   1.69   24689.5    2   2016-01-31  

Ich verwende,

x <- toJSON(unname(split(all.elasticities, 1:nrow(all.elasticities)))) 

I-Ausgang bin immer so,

"[{\"PREVIOUS_START_DATE\":16789,\"PREVIOUS_PRICE\":2.79,\"PREVIOUS_QUANTITY\":20680.5,\"PRE_No_OF_WEEKS\":2,\"CURRENT_START_DATE\":16789},{\"PREVIOUS_START_DATE\":16817,\"PREVIOUS_PRICE\":2.29,\"PREVIOUS_QUANTITY\":21049.5,\"PRE_No_OF_WEEKS\":4,\"CURRENT_START_DATE\":16817},{\"PREVIOUS_START_DATE\":16831,\"PREVIOUS_PRICE\":1.69,\"PREVIOUS_QUANTITY\":24689.5,\"PRE_No_OF_WEEKS\":2,\"CURRENT_START_DATE\":16831}]" 

Daten werden immer in Zahlen umgewandelt. Ich möchte das Datumsformat beibehalten.

Answer 1

Wie in einem Kommentar erwähnt wurde, müssen Sie Datum, um ein Zeichen konvertieren zuerst:

x = as.Date("2016-01-01") 
RJSONIO::toJSON(as.character(x)) 

Wenn Sie zu einem Zeichen nicht konvertieren, wird der Wert auf einen numerischen geändert, wenn das repräsentiert Anzahl der Tage seit 1970, z

as.numeric(x) 
as.numeric(x)/365 

Answer 2

library(jsonlite) Arbeiten mit Datumsformate, und es gibt auch keine Notwendigkeit, entweder die data.frame aufzuspalten.

str(all.elasticities) 
'data.frame': 3 obs. of 5 variables: 
$ PREVIOUS_START_DATE: Date, format: "2015-12-20" "2016-01-17" "2016-01-31" 
$ PREVIOUS_PRICE  : num 2.79 2.29 1.69 
$ PREVIOUS_QUANTITY : num 20680 21050 24690 
$ PRE_No_OF_WEEKS : int 2 4 2 
$ CURRENT_START_DATE : Date, format: "2015-12-20" "2016-01-17" "2016-01-31" 


> jsonlite::toJSON(all.elasticities, pretty=T) 
[ 
    { 
    "PREVIOUS_START_DATE": "2015-12-20", 
    "PREVIOUS_PRICE": 2.79, 
    "PREVIOUS_QUANTITY": 20680.5, 
    "PRE_No_OF_WEEKS": 2, 
    "CURRENT_START_DATE": "2015-12-20" 
    }, 
    { 
    "PREVIOUS_START_DATE": "2016-01-17", 
    "PREVIOUS_PRICE": 2.29, 
    "PREVIOUS_QUANTITY": 21049.5, 
    "PRE_No_OF_WEEKS": 4, 
    "CURRENT_START_DATE": "2016-01-17" 
    }, 
    { 
    "PREVIOUS_START_DATE": "2016-01-31", 
    "PREVIOUS_PRICE": 1.69, 
    "PREVIOUS_QUANTITY": 24689.5, 
    "PRE_No_OF_WEEKS": 2, 
    "CURRENT_START_DATE": "2016-01-31" 
    } 
]