Factorial digit sum