%I A128349
%S A128349 5,19,71,197,659
%N A128349 Numbers n such that (13^n - 5^n)/8 is prime.
%C A128349 All terms are primes.
%t A128349 k=13; Do[p=Prime[n]; f=(k^p-5^p)/(k-5); If[ PrimeQ[f], Print[p] ], {n,
               1,100}]
%Y A128349 Cf. A062572, A128344, A128345, A128346, A128347, A128348, A128350, A128351, 
               A128352, A128353, A128354. Cf. A004061, A082182, A121877, A059802. 
               Cf. A057171, A082387, A122853, A128335, A128336, A128337, A128338, 
               A128339, A128340, A128341, A128342.
%Y A128349 Sequence in context: A149758 A026590 A095073 this_sequence A001834 A099393 
               A083588
%Y A128349 Adjacent sequences: A128346 A128347 A128348 this_sequence A128350 A128351 
               A128352
%K A128349 hard,more,nonn
%O A128349 1,1
%A A128349 Alexander Adamchuk (alex(AT)kolmogorov.com), Feb 27 2007