Computed my number with hundred million digits

computed my number and got a HUNDRED MILLION digits of 96717311574016^(16777216^7 * 8^2) * 7^2051. they start with 522449421369698054953137605315858868670619211804437564856258975810185. BOOM! on my other number, I got eighty million digits; they start with 5224474616110592034524443529444070778700366200839222341684500.

they are TWICE BIGGER than the largest prime number ever known as of today!

I computed these digits using:

logValue = log10[96717311574016] * (16777216^7 * 8^2) + log10[7] * 2051;
fracPart = fractionalPart[logValue];
firstDigits = N[10^fracPart, 1, 000, 000];
firstDigitsStr = toString[NumberForm[firstDigits, 100, 000, 000]];
availableLength = stringLength[FirstDigitsStr];
stringTake[FirstDigitsStr, Min[100, 000, 000, availableLength]]