A200924 Successive prime factors of 10^(10^100) - 10.
2, 3, 3, 3, 3, 5, 37, 67, 83, 199, 397, 1231, 1627, 2707, 3637, 4519, 21649, 30307, 34849, 51203, 52711, 54547, 56369, 97561, 115963, 123493, 136043, 139987, 149077, 173923, 199999, 200003, 333667, 370477, 513239, 538987, 666733, 770437, 943081, 1466653
Offset: 1
Links
- Dario A. Alpern, Known prime factors of Googolplex - 10
- Eric Weisstein's World of Mathematics, Googolplex
Programs
-
Mathematica
Join[{2, 3, 3, 3, 3, 5}, Select[Prime[Range[7^6]], PowerMod[10, 10^100, #] == 10 &]]