A154510 - OEIS

%I #20 Sep 08 2022 08:45:40

%S 10657,16561,23761,32257,65521,79201,287281,374977,474337,510049,

%T 624961,665857,708049,988417,1039681,1092241,1146097,1315441,1374481,

%U 1755937,1893457,2036161,2259937,2913697,3090097,3553777,4470049,5255281

%N Primes of the form 648*n^2 + 72*n + 1.

%H Vincenzo Librandi and T. D. Noe, <a href="/A154510/b154510.txt">Table of n, a(n) for n = 1..1000</a>

%e For n=4, a(1)=10657; n=10, a(5)=65521.

%t lst={};Do[p=648*n^2+72*n+1;If[PrimeQ[p],AppendTo[lst,p]],{n,0,5*5!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Jan 27 2009 *)

%t Select[Table[648n^2+72n+1,{n,100}],PrimeQ] (* _Harvey P. Dale_, Jul 27 2011 *)

%o (Magma) [ a: n in [0..350] | IsPrime(a) where a is 648*n^2+72*n+1]

%Y Cf. A154511

%K nonn

%O 1,1

%A _Vincenzo Librandi_, Jan 11 2009