A260566 - OEIS

%I #15 Sep 08 2022 08:46:13

%S 2,7,70,178,208,251,274,276,290,326,328,350,413,452,552,558,594,595,

%T 605,607,626,787,791,801,905,971,1019,1091,1117,1140,1198,1241,1274,

%U 1357,1428,1462,1604,1647,1654,1705,1717,1908,1987,2061,2109,2161,2309,2372,2450

%N Numbers n such that (n^61+1)/(n+1) is prime.

%H Tim Johannes Ohrtmann, <a href="/A260566/b260566.txt">Table of n, a(n) for n = 1..10000</a>

%t Select[Range[1, 10000], PrimeQ[(#^61 + 1)/(# + 1)] &]

%o (PARI) for(n=1,10000, if(isprime((n^61+1)/(n+1)), print1(n,", ")))

%o (Magma) [n: n in [1..10000] |IsPrime((n^61 + 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