%I #17 Jan 17 2019 13:44:06
%S 17,673,307,19,523,607,181,199,31,1009,29,23,177943,61,312929,17,821,
%T 353,363941,829,19,686269,31,1019,2761379,145501,1397023,28529353,47,
%U 2543,17,439,23,59,70717063,15683,31,19,4555681103,10616546557,28759,83
%N Smallest prime dividing the composite number consisting of A089017(n) successive 3's followed by a terminal 1.
%H Factordb, <a href="http://factordb.com/index.php?query=%2810^n-7%29%2F3&use=n&n=1&VP=on&VC=on&EV=on&OD=on&PR=on&FF=on&PRP=on&CF=on&U=on&C=on&perpage=200&format=1&sent=Show">(10^n-7)/3</a>
%H Makoto Kamada, <a href="https://stdkmd.net/nrr/3/33331.htm">Factorizations of 33...331</a>
%o (PARI) do(lim)=my(v=List());for(n=9,lim+1,if(ispseudoprime(10^n\3-2), next); forprime(p=7,,if(Mod(10,p)^n==7,listput(v,p); next(2)))); Vec(v) \\ tests numbers with A089017(n) <= m; _Charles R Greathouse IV_, Oct 23 2013
%K base,nonn
%O 1,1
%A _Lekraj Beedassy_, Nov 04 2003
%E More terms from _Ray Chandler_, Nov 04 2003
|