|
%I #23 Sep 08 2022 08:45:39
%S 11,17,29,47,71,101,137,179,227,281,479,557,641,827,929,1151,1667,
%T 1811,2447,2621,2801,3581,4007,4229,4457,4691,4931,6221,6779,8597,
%U 9587,9929,10631,12107,12491,13679,14087,16217,16661,19937,25127,25679,26237
%N Primes of the form 3*n^2 - 3*n + 11.
%C Subsequence of A003627, A007528, A045371. - _Bruno Berselli_, Jul 16 2012
%C Also primes p such that (4*p-41)/3 is a square. - _Bruno Berselli_, Sep 14 2015
%H Vincenzo Librandi, <a href="/A153502/b153502.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Table[3 n^2 - 3 n + 11, {n, 1, 700}], PrimeQ] (* _Vincenzo Librandi_, Jul 16 2012 *)
%o (Magma) [a: n in [1..100] | IsPrime(a) where a is 3*n^2-3*n+11]; // _Vincenzo Librandi_, Jul 16 2012
%o (PARI) lista(nn) = for (n=1, nn, if (isprime(p=3*n^2-3*n+11), print1(p, ", "))) \\ _Michel Marcus_, Sep 14 2015
%Y Cf. A003627, A007528, A045371.
%K nonn,easy
%O 1,1
%A _Vincenzo Librandi_, Dec 28 2008
|
