%I #15 Sep 08 2022 08:46:13
%S 61,63,99,144,230,312,360,401,413,424,451,515,542,567,610,618,622,651,
%T 690,732,817,871,1007,1100,1156,1278,1403,1427,1460,1535,1572,1604,
%U 1681,1742,1802,1820,1847,1903,1910,1913,1978,2019,2104,2134,2152,2169,2309,2383
%N Numbers n such that (n^41+1)/(n+1) is prime.
%H Tim Johannes Ohrtmann, <a href="/A260561/b260561.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Range[1, 10000], PrimeQ[(#^41 + 1)/(# + 1)] &]
%o (PARI) for(n=1,10000, if(isprime((n^41+1)/(n+1)), print1(n,", ")))
%o (Magma) [n: n in [1..10000] |IsPrime((n^41 + 1) div (n + 1))]
%Y Cf. A055494, A246392, A250174, A250178, A250181, A250185, A250187, A250193, A260558-A260573.
%K nonn
%O 1,1
%A _Tim Johannes Ohrtmann_, Jul 29 2015