A260571 Numbers n such that (n^83+1)/(n+1) is prime.

49, 75, 458, 471, 634, 734, 798, 809, 932, 1139, 1268, 1400, 1498, 1963, 1989, 2112, 2177, 2233, 2252, 2349, 2365, 2446, 2729, 2841, 2861, 2887, 3013, 3048, 3239, 3262, 3403, 3464, 3703, 3855, 3883, 4534, 5147, 5189, 5523, 5611, 5778, 6041, 6200, 6336, 6682, 7068

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^83 + 1) div (n + 1))]

Mathematica

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

PARI

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