how to Find factorizations of 974!+2 by using algorithms in mathematica