How do I create a POSIXct date from the date and time parts below
date<-as.Date("2014-01-01")
hour<-5
minute<-15
second<-59
millisecond<-695
date
hour
minute
second
millisecond
output should be a POSIXct object
2014-01-01 05:15:59.695