A260558 Numbers k such that (k^29+1)/(k+1) is prime.

7, 15, 25, 62, 119, 123, 154, 245, 285, 294, 295, 357, 371, 476, 626, 664, 690, 708, 723, 737, 768, 783, 803, 825, 826, 835, 841, 842, 867, 871, 897, 904, 934, 953, 1066, 1069, 1088, 1097, 1108, 1183, 1197, 1202, 1259, 1302, 1364, 1461, 1497, 1528, 1559, 1638

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, A260559-A260573.

Programs

Magma

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

Mathematica

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

PARI

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