A260569 Numbers n such that (n^73+1)/(n+1) is prime.

18, 214, 280, 394, 422, 444, 447, 571, 745, 787, 796, 886, 954, 960, 987, 1012, 1055, 1140, 1194, 1212, 1224, 1227, 1349, 1583, 1598, 1640, 1686, 1714, 1723, 1750, 1931, 1962, 2032, 2036, 2110, 2223, 2339, 2774, 2827, 2859, 2957, 3063, 3192, 3236, 3285, 3485

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

Mathematica

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

PARI

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