login
A227246
List of prime factors of 10^(10^(10^100)) - 10.
3
2, 3, 3, 3, 3, 5, 37, 67, 83, 199, 307, 397, 439, 613, 1123, 1231, 1283, 1627, 2467, 2707, 3203, 3637, 4507, 4519, 5987, 9013, 9043, 9929, 12547, 14369, 14747, 16729, 16843, 16963, 17959, 18973, 21649, 25603, 30307, 32003, 34849, 40151, 42307, 43013, 49787
OFFSET
1,1
LINKS
Eric Weisstein's World of Mathematics, Googolplex
MATHEMATICA
(* Import Mmca coding for "SuperPowerMod" and "LogStar" from text file and then *) k = 5; lst = {2, 3, 3, 3, 3, 5}; While[k < 10001, If[ SuperPowerMod[10, 4, Prime@ k] == 10, AppendTo[lst, Prime@ k]]; k++]; lst (* Robert G. Wilson v, Mar 01 2014 *)
CROSSREFS
Sequence in context: A035367 A042959 A147815 * A200924 A111913 A354142
KEYWORD
nonn,fini
AUTHOR
STATUS
approved