Was sind die "Standard eindeutigen Datumsformate" für die Konvertierung von Zeichenfolgen in Datumsangaben in R?

Bitte beachten Sie Folgendes

$ R --vanilla

> as.Date("01 Jan 2000")
Error in charToDate(x) :
    character string is not in a standard unambiguous format

Aber zu diesem Zeitpunkt klar ist in einem Standard - Format eindeutig. Warum die Fehlermeldung?

Schlimmer noch, ein mehrdeutiges Datum wird anscheinend ohne Vorwarnung oder Fehler akzeptiert und dann falsch gelesen!

> as.Date("01/01/2000")
[1] "0001-01-20"

Ich habe 28 andere Fragen im [R] -Tag gesucht und gefunden, die diese Fehlermeldung enthalten. Alle mit Lösungen und Problemumgehungen, bei denen das Format angegeben wird, iiuc. Diese Frage unterscheidet sich darin, dass ich frage, wo die standardmäßigen eindeutigen Formate überhaupt definiert sind und ob sie geändert werden können. Bekommt jeder diese Nachrichten oder bin es nur ich? Vielleicht hängt es mit dem Gebietsschema zusammen?

Mit anderen Worten, gibt es eine bessere Lösung, als das Format angeben zu müssen?

29 Fragen mit "[R] Standard eindeutiges Format"

> sessionInfo()
R version 2.15.2 (2012-10-26)
Platform: x86_64-w64-mingw32/x64 (64-bit)

locale:
[1] LC_COLLATE=English_United Kingdom.1252
[2] LC_CTYPE=English_United Kingdom.1252
[3] LC_MONETARY=English_United Kingdom.1252
[4] LC_NUMERIC=C
[5] LC_TIME=English_United Kingdom.1252

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base

Dies ist dokumentiertes Verhalten. Von ?as.Date:

Format: Eine Zeichenfolge. Wenn nicht angegeben, wird ''% Y-% m-% d "'und dann'"% Y /% m /% d "'für das erste Nicht-'NA'-Element versucht und ein Fehler ausgegeben, wenn keines funktioniert.

as.Date("01 Jan 2000")gibt einen Fehler aus, da das Format nicht eines der beiden oben aufgeführten ist. as.Date("01/01/2000")ergibt eine falsche Antwort, da das Datum nicht in einem der beiden oben aufgeführten Formate vorliegt.

Ich verstehe "Standard eindeutig" als "ISO-8601" (obwohl dies as.Datenicht so streng ist, da "% m /% d /% Y" nicht ISO-8601 ist).

Wenn Sie diesen Fehler erhalten, besteht die Lösung darin, das Format Ihres Datums (oder Ihrer Datums- / Uhrzeitangaben) in den unter beschriebenen Formaten anzugeben ?strptime. Seien Sie besonders vorsichtig, wenn Ihre Daten Tages- / Monatsnamen und / oder Abkürzungen enthalten, da die Konvertierung von Ihrem Gebietsschema abhängt (siehe Beispiele in ?strptimeund lesen Sie ?LC_TIME).

Mit anderen Worten, gibt es eine bessere Lösung, als das Format angeben zu müssen?

Ja, es gibt jetzt (dh Ende 2016) dank anytime::anydatedes jederzeit verfügbaren Pakets.

Im Folgenden finden Sie einige Beispiele von oben:

R> anydate(c("01 Jan 2000", "01/01/2000", "2015/10/10"))
[1] "2000-01-01" "2000-01-01" "2015-10-10"
R> 

Wie Sie sagten, sind diese in der Tat eindeutig und sollten einfach funktionieren. Und über anydate()sie. Ohne Format.

Als Ergänzung zur Antwort von @JoshuaUlrich folgt hier die Definition der Funktion as.Date.character:

as.Date.character
function (x, format = "", ...) 
{
    charToDate <- function(x) {
        xx <- x[1L]
        if (is.na(xx)) {
            j <- 1L
            while (is.na(xx) && (j <- j + 1L) <= length(x)) xx <- x[j]
            if (is.na(xx)) 
                f <- "%Y-%m-%d"
        }
        if (is.na(xx) || !is.na(strptime(xx, f <- "%Y-%m-%d", 
            tz = "GMT")) || !is.na(strptime(xx, f <- "%Y/%m/%d", 
            tz = "GMT"))) 
            return(strptime(x, f))
        stop("character string is not in a standard unambiguous format")
    }
    res <- if (missing(format)) 
        charToDate(x)
    else strptime(x, format, tz = "GMT")
    as.Date(res)
}
<bytecode: 0x265b0ec>
<environment: namespace:base>

Wenn also beides strptime(x, format="%Y-%m-%d")und ein strptime(x, format="%Y/%m/%d")geworfen wird NA, wird es als mehrdeutig und wenn nicht eindeutig angesehen.

Das Konvertieren des Datums ohne Angabe des aktuellen Formats kann diesen Fehler leicht verursachen.

Hier ist ein Beispiel:

sdate <- "2015.10.10"

Konvertieren ohne Angabe des Formats:

date <- as.Date(sdate4) # ==> This will generate the same error"""Error in charToDate(x): character string is not in a standard unambiguous format""".

Mit angegebenem Format konvertieren:

date <- as.Date(sdate4, format = "%Y.%m.%d") # ==> Error Free Date Conversion.

Dies funktioniert perfekt für mich, egal wie das Datum zuvor codiert wurde.

library(lubridate)
data$created_date1 <- mdy_hm(data$created_at)
data$created_date1 <- as.Date(data$created_date1)