Tidy age description.

Tidy age description.

Usage

tidy_age(x, unit = "year")

Arguments

x

Vector contains age description in Chinese.

unit

Character, unit of values return, options are "year", "month", or "day", default is "year".

Value

Numeric vector contains age.

Examples

agedes <- c("50\u5c8110\u67083\u6708", "19\u5c815\u6708",
            "1\u5c8130\u6708", "3\u670820\u6708","30\u6708")
tidy_age(agedes, unit = "year")
#> [1] 50 19  3  1  2
tidy_age(agedes, unit = "month")
#> [1] 602 232  41  20  30
tidy_age(agedes, unit = "day")
#> [1] 18354  7092  1278   609   913