Hinzufügen von Zeit zu Tag spezifizierte Daten in R

Question

Ich möchte Stunden zu Tag angegebene Daten hinzufügen. Und ich möchte, dass die Ausgabe im Datumsformat ist. Ich schrieb den folgenden Code:

day<-as.Date(c("20-01-2016", "21-01-2016", "22-01-2016", "23-01-2016"),format="%d-%m-%Y") 
hour<-c("12:00:00") 
date<-as.Date(paste(day,hour), format="%d-%m-%Y %h:%m:%s") 

jedoch Dieser Code erzeugt NA:

> date 
[1] NA NA NA NA 

Wie kann ich dies tun in R? Ich werde mich sehr für jede Hilfe freuen. Danke vielmals.

Der Code unten funktioniert auch nicht:

day<-as.Date(c("20-01-2016", "21-01-2016", "22-01-2016", "23-01-2016"),format="%d-%m-%Y") 
time <- "12:00:00" 
x <- paste(day, time) 
x1<-as.POSIXct(x, format = "%d-%m-%Y %H:%M:%S") 

Es NAs noch prodeces:

> x1 
[1] NA NA NA NA 

Answer 1

Sie können entweder von diesen beiden tun:

dates <- as.Date(c("20-01-2016", "21-01-2016", "22-01-2016", "23-01-2016"), format = "%d-%m-%Y") 
time <- "12:00:00" 
x <- paste(dates, time) 
as.POSIXct(x, format = "%Y-%m-%d %H:%M:%S") 

dates <- c("20-01-2016", "21-01-2016", "22-01-2016", "23-01-2016") 
time <- "12:00:00" 
x <- paste(dates, time) 
as.POSIXct(x, format = "%d-%m-%Y %H:%M:%S") 

Ich persönlich finde die zweite Version einfacher.