A141401 - OEIS

%I #21 Sep 21 2024 15:12:10

%S 1,2,4,7,8,9,16,17,21,23,24,27,36,42,52,53,57,58,64,66,67,77,78,81,84,

%T 86,87,92,93,94,104,106,111,123,132,138,143,146,152,159,172,176,179,

%U 183,188,189,191,196,198,202,212,217,227,232,234,236,239,246,253,256,272

%N Numbers n such that 16*n^4 + 625 is prime.

%H Robert Israel, <a href="/A141401/b141401.txt">Table of n, a(n) for n = 1..10000</a>

%p select( n -> isprime(16*n^4+625), [$0..1000]);

%t Select[Range[300],PrimeQ[16 #^4+625]&] (* _Harvey P. Dale_, Mar 04 2024 *)

%o (Magma) [n: n in [0..500] |IsPrime(16*n^4 + 625 )]; // _Vincenzo Librandi_, Nov 25 2010

%o (PARI) is(n)=isprime(16*n^4+625) \\ _Charles R Greathouse IV_, Jun 13 2017

%K easy,nonn

%O 1,2

%A _James R. Buddenhagen_, Aug 03 2008

%E More terms from _Vincenzo Librandi_, Mar 25 2010