%I #17 Sep 08 2022 08:46:13
%S 70,121,300,317,348,404,412,460,515,605,839,843,904,953,1130,1148,
%T 1342,1466,1674,1779,1855,2080,2108,2193,2466,2519,2597,2633,2697,
%U 2756,2793,2799,2846,2877,2899,2929,2952,3081,3244,3283,3300,3315,3636,3730,3739,3833
%N Numbers n such that (n^97+1)/(n+1) is prime.
%H Tim Johannes Ohrtmann, <a href="/A260573/b260573.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Range[1, 10000], PrimeQ[(#^97 + 1)/(# + 1)] &]
%o (PARI) for(n=1,10000, if(isprime((n^97+1)/(n+1)), print1(n,", ")))
%o (Magma) [n: n in [1..10000] |IsPrime((n^97 + 1) div (n + 1))]
%Y Cf. A055494, A246392, A250174, A250178, A250181, A250185, A250187, A250193, A260558-A260572.
%K nonn
%O 1,1
%A _Tim Johannes Ohrtmann_, Jul 29 2015