A260561 Numbers n such that (n^41+1)/(n+1) is prime.
61, 63, 99, 144, 230, 312, 360, 401, 413, 424, 451, 515, 542, 567, 610, 618, 622, 651, 690, 732, 817, 871, 1007, 1100, 1156, 1278, 1403, 1427, 1460, 1535, 1572, 1604, 1681, 1742, 1802, 1820, 1847, 1903, 1910, 1913, 1978, 2019, 2104, 2134, 2152, 2169, 2309, 2383
Offset: 1
Keywords
Links
- Tim Johannes Ohrtmann, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Magma
[n: n in [1..10000] |IsPrime((n^41 + 1) div (n + 1))]
-
Mathematica
Select[Range[1, 10000], PrimeQ[(#^41 + 1)/(# + 1)] &]
-
PARI
for(n=1,10000, if(isprime((n^41+1)/(n+1)), print1(n,", ")))