Pad a yishuv id to a 4-digit character vector
Value
A character vector the same length as yishuv_id, where each element is
4 characters long and left-padded with "0".
Examples
x <- c(1, "23", "4000", 5600)
pad_yishuv_id(x)
#> [1] "0001" "0023" "4000" "5600"