redo as Integer#factorial_digit_sum