A230139 Numbers n such that (17^n - 4^n)/13 is prime.

3, 5, 7, 11, 31, 101, 887, 4861

Offset

1,1

Comments

All terms are prime.

a(9) > 10^5.

Links

Table of n, a(n) for n=1..8.

Mathematica

Select[Prime[Range[1, 100000]], PrimeQ[(17^# - 4^#)/13]&]

Prog

(PARI) is(n)=ispseudoprime((17^n-4^n)/13) \\ Charles R Greathouse IV, Jun 13 2017

Crossrefs

Cf. A004063, A028491, A057468, A059801, A121877, A128024, A128025, A128026, A128027, A128028, A128029, A128030, A128031, A128032, A210506, A128347, A128352, A225807.

Sequence in context: A265788 A061245 A361898 * A242944 A137355 A147143

Adjacent sequences: A230136 A230137 A230138 * A230140 A230141 A230142

Keyword

nonn,hard,more

Author

Robert Price, Oct 10 2013

Status

approved