R Studio Print Factorial value using powers of 10 notation

Question

n <- factorial(20)
print(n)

[1] 2.432902e+18

Print results using powers of 10 notation