A260573 Numbers n such that (n^97+1)/(n+1) is prime.

70, 121, 300, 317, 348, 404, 412, 460, 515, 605, 839, 843, 904, 953, 1130, 1148, 1342, 1466, 1674, 1779, 1855, 2080, 2108, 2193, 2466, 2519, 2597, 2633, 2697, 2756, 2793, 2799, 2846, 2877, 2899, 2929, 2952, 3081, 3244, 3283, 3300, 3315, 3636, 3730, 3739, 3833

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-A260572.

Programs

Magma

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

Mathematica

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

PARI

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