%I #13 Nov 01 2018 21:26:46
%S 13,19,31,359,487,757,761,1667,2551,3167,6829
%N Numbers k such that (13^k + 5^k)/18 is prime.
%C All terms are primes.
%C No other terms below 23600. - _Max Alekseyev_, Feb 01 2010
%C a(12) > 10^5. - _Robert Price_, Apr 30 2013
%t k=13; Do[p=Prime[n]; f=(k^p+5^p)/(k+5); If[ PrimeQ[f], Print[p] ], {n,1,100}]
%o (PARI) is(n)=isprime((13^n+5^n)/18) \\ _Charles R Greathouse IV_, Feb 17 2017
%Y Cf. A057171, A082387, A122853, A128335, A128336, A128337, A128338, A128339, A128340, A128341, A128343. Cf. A004061, A082182, A121877, A059802. Cf. A062572, A128344, A128345, A128346, A128347, A128348, A128349, A128350, A128351, A128352, A128353, A128354.
%K hard,more,nonn
%O 1,1
%A _Alexander Adamchuk_, Feb 27 2007
%E Four more terms from _Max Alekseyev_, Feb 01 2010