Converts time from internal format to an hour.
emr_time2hour(time)
vector of times in internal format
Vector of converted times. NA values in the vector would be returned as NA's.
This function converts time from internal format to an hour in [0, 23] range.
emr_db.init_examples()
#> NULL
# 30 January, 1938, 6:00 - birthday of Islam Karimov
t <- emr_date2time(30, 1, 1938, 6)
emr_time2hour(t)
#> [1] 6
emr_time2dayofmonth(t)
#> [1] 30
emr_time2month(t)
#> [1] 1
emr_time2year(t)
#> [1] 1938