%I A128348
%S A128348 2,3,31,41,53,101,421
%N A128348 Numbers n such that (12^n - 5^n)/7 is prime.
%C A128348 All terms are primes.
%t A128348 k=12; Do[p=Prime[n]; f=(k^p-5^p)/(k-5); If[ PrimeQ[f], Print[p] ], {n,
               1,100}]
%Y A128348 Cf. A062572, A128344, A128345, A128346, A128347, A128349, A128350, A128351, 
               A128352, A128353, A128354. Cf. A004061, A082182, A121877, A059802. 
               Cf. A057171, A082387, A122853, A128335, A128336, A128337, A128338, 
               A128339, A128340, A128341, A128342.
%Y A128348 Sequence in context: A136150 A155056 A110456 this_sequence A029973 A054551 
               A049065
%Y A128348 Adjacent sequences: A128345 A128346 A128347 this_sequence A128349 A128350 
               A128351
%K A128348 hard,more,nonn
%O A128348 1,1
%A A128348 Alexander Adamchuk (alex(AT)kolmogorov.com), Feb 27 2007