A260567 Numbers n such that (n^67+1)/(n+1) is prime.

5, 10, 23, 33, 40, 54, 193, 326, 330, 364, 375, 382, 388, 404, 438, 449, 562, 625, 626, 683, 700, 765, 797, 807, 1001, 1017, 1136, 1181, 1216, 1242, 1249, 1254, 1286, 1386, 1412, 1482, 1581, 1656, 1748, 1832, 1873, 1921, 2017, 2038, 2061, 2166, 2193, 2204, 2253

Offset: 1

Author

Tim Johannes Ohrtmann, Jul 29 2015

Keywords

• nonn

Links

• Tim Johannes Ohrtmann, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A055494, A246392, A250174, A250178, A250181, A250185, A250187, A250193, A260558-A260573.

Programs

Magma

[n: n in [1..10000] |IsPrime((n^67 + 1) div (n + 1))]

Mathematica

Select[Range[1, 10000], PrimeQ[(#^67 + 1)/(# + 1)] &]

PARI

for(n=1,10000, if(isprime((n^67+1)/(n+1)), print1(n,", ")))