Converts time from internal format to a year.

emr_time2year(time)

Arguments

time

vector of times in internal format

Value

Vector of converted times. NA values in the vector would be returned as NA's.

Details

This function converts time from internal format to a year.

Examples


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