Pad a yishuv id to a 4-digit character vector
Value
A character or numeric vector, where each element is 4 characters long, containing only numbers and left-padded with 0's.
Examples
x <- c(1, "23", "4000", 5600)
pad_yishuv_id(x)
#> [1] "0001" "0023" "4000" "5600"