|
%I #17 Sep 08 2022 08:46:13
%S 7,15,25,62,119,123,154,245,285,294,295,357,371,476,626,664,690,708,
%T 723,737,768,783,803,825,826,835,841,842,867,871,897,904,934,953,1066,
%U 1069,1088,1097,1108,1183,1197,1202,1259,1302,1364,1461,1497,1528,1559,1638
%N Numbers n such that (n^29+1)/(n+1) is prime.
%H Tim Johannes Ohrtmann, <a href="/A260558/b260558.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Range[1, 10000], PrimeQ[(#^29 + 1)/(# + 1)] &]
%o (PARI) for(n=1,10000, if(isprime((n^29+1)/(n+1)), print1(n,", ")))
%o (Magma) [n: n in [1..10000] |IsPrime((n^29 + 1) div (n + 1))]
%Y Cf. A055494, A246392, A250174, A250178, A250181, A250185, A250187, A250193, A260559-A260573.
%K nonn
%O 1,1
%A _Tim Johannes Ohrtmann_, Jul 29 2015
|
