powered by
use the lookup table of fourth digit
rtf_lookup_fourth(out, lookup_fourth, verbose = FALSE)