A260562 Numbers n such that (n^43+1)/(n+1) is prime.

2, 3, 6, 22, 59, 83, 91, 95, 120, 148, 195, 196, 201, 247, 252, 264, 315, 360, 378, 458, 555, 680, 792, 893, 1025, 1088, 1158, 1171, 1240, 1280, 1416, 1437, 1632, 1661, 1677, 1681, 1849, 1946, 1960, 2007, 2090, 2092, 2225, 2242, 2244, 2377, 2483, 2547, 2596, 2641

Offset

1,1

Links

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

Mathematica

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

Prog

(PARI) for(n=1, 10000, if(isprime((n^43+1)/(n+1)), print1(n, ", ")))
(Magma) [n: n in [1..10000] |IsPrime((n^43 + 1) div (n + 1))]

Crossrefs

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

Sequence in context: A094470 A015764 A015759 * A173249 A303584 A261014

Adjacent sequences: A260559 A260560 A260561 * A260563 A260564 A260565

Keyword

nonn

Author

Tim Johannes Ohrtmann, Jul 29 2015

Status

approved