%I #19 Jul 08 2023 20:08:22
%S 2,3,3,3,3,5,37,67,83,199,307,397,439,613,1123,1231,1283,1627,2467,
%T 2707,3203,3637,4507,4519,5987,9013,9043,9929,12547,14369,14747,16729,
%U 16843,16963,17959,18973,21649,25603,30307,32003,34849,40151,42307,43013,49787
%N List of prime factors of 10^(10^(10^100)) - 10.
%H Robert G. Wilson v, <a href="/A227246/b227246.txt">Table of n, a(n) for n = 1..10000</a>
%H Dario A. Alpern, <a href="https://www.alpertron.com.ar/glpxm10.pl">Known prime factors of Googolplexplex - 10</a>
%H Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Googolplex.html">Googolplex</a>
%t (* 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 *)
%Y Cf. A200924, A227245.
%K nonn,fini
%O 1,1
%A _Arkadiusz Wesolowski_, Nov 02 2013
|