A276263 Centered 23-gonal primes.
139, 829, 4831, 15319, 36709, 53959, 58789, 65551, 74521, 107089, 142969, 198859, 227011, 278071, 292561, 727399, 750721, 804541, 879199, 957169, 1181281, 1325491, 1364821, 1519519, 1700161, 1835401, 1881631, 2111539, 2231461, 2396509, 2778079, 2926981, 3067879
Offset: 1
Keywords
Links
- OEIS Wiki, Centered polygonal numbers
- Eric Weisstein's World of Mathematics, Centered Polygonal Number
- Index entries for sequences related to centered polygonal numbers
Programs
-
Mathematica
Intersection[Table[(23 k^2 + 23 k + 2)/2, {k, 0, 1000}], Prime[Range[230000]]] Select[Table[(23k^2+23k+2)/2,{k,600}],PrimeQ] (* Harvey P. Dale, Jun 17 2021 *)
-
PARI
lista(nn) = for(n=1, nn, if(isprime(p=(23*n^2 + 23*n + 2)/2), print1(p, ", "))); \\ Altug Alkan, Aug 26 2016
Comments