|
%I #22 Sep 08 2022 08:44:57
%S 0,1,2,3,4,5,6,7,8,9,12,13,15,16,17,18,20,23,25,28,29,30,34,38,39,41,
%T 45,47,51,52,56,58,60,61,62,67,68,73,75,78,80,81,83,84,85,93,94,96,
%U 100,101,103,106,108,113,114,122,123,124,125,127,130,135
%N Numbers k such that k^2 + k + 11 is prime.
%H Vincenzo Librandi, <a href="/A048097/b048097.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[0,150],PrimeQ[#^2+#+11]&] (* _Harvey P. Dale_, May 18 2011 *)
%o (Magma) [n: n in [0..150] |IsPrime(n^2+n+11)]; // _Vincenzo Librandi_, Aug 06 2010
%o (PARI) is(n)=isprime(n^2+n+11) \\ _Charles R Greathouse IV_, Feb 17 2017
%Y Cf. A048058, A048059.
%K nonn,easy
%O 1,3
%A _N. J. A. Sloane_
|
