Quote Originally Posted by [XC] riptide View Post
Can you export all the digits? I mean does it deliver all the digits? There should be 4080578 digits.
That run of 0.405 seconds did only binary digits. Printing it out in decimal requires an expensive conversion.


Code:
750000!
\!\(\*
TagBox[
RowBox[{"2646896442810456334473283390526976189442958803731348335812907\
9334567747113504796887022327350144664381155203676817108918748679291696\
6443372148573575453227479621798163102781469763477812875007762400556456\
3838296982600913849826449820515029294880777450379489322119687361868491\
51503071358153700424169800424565", 
RowBox[{"<<", "4079973", ">>"}], 
    "00000000000000000000000000000000000000000000000000000000000000000\
0000000000000000000000000000000000000000000000000000000000000000000000\
0000000000000000000000000000000000000000000000000000000000000000000000\
0000000000000000000000000000000000000000000000000000000000000000000000\
0000000000000000000000000000"}],
Short[#, 5]& ]\)

Took roughly 6 seconds including conversion.