Konvertieren numerische Daten wie "715" in Datum "Juli-2015" in R

Question

Ich würde gerne eine Frage zur Konvertierung von numerischen Daten in Datumsformat stellen.

Ich mag die numerischen Daten konvertieren, wie:

time1<-c(715, 1212, 0416) 

zu

July-2015, Dec-2012, Apr-2016 

Ich habe diesen Code versucht, aber es funktioniert nicht.

time2<-as.Date(as.character(time1), format="%m%y") 

Hat jemand einige Ideen, um dieses Problem zu lösen?

Answer 1

Teil des Problems ist, dass "Juli 2015", "Dezember 2012" und "April 2016" sind nicht Termine, da der spezifische Tag fehlt. Ein anderer Ansatz ist die Konvertierung in zoo::yearmon. Hier muss die numerische Eingabe mit führenden Nullen in einen String umgewandelt werden, so dass der Monat von 01 zu 12 ist:

library(zoo) 
ym <- as.yearmon(sprintf("%04d",time1),format="%m%y") 
ym 
##[1] "Jul 2015" "Dec 2012" "Apr 2016" 

Das Ergebnis ist die Klasse yearmon, die dann zu Date dazu gezwungen werden können:

class(ym) 
##[1] "yearmon" 
d <- as.Date(ym) 
d 
##[1] "2015-07-01" "2012-12-01" "2016-04-01" 
class(d) 
##[1] "Date" 

Answer 2

Versuchen lubridate::parse_date_time():

library(lubridate) 
time2 <- parse_date_time(time1, orders = "my") 
format.Date(time2, "%b-%Y") 
[1] "juil.-2015" "déc.-2012" "avril-2016" # my locale lang is French