A083577 Primes in A003154.
13, 37, 73, 181, 337, 433, 541, 661, 937, 1093, 2053, 2281, 2521, 3037, 3313, 5581, 5953, 6337, 6733, 7561, 7993, 8893, 10333, 10837, 11353, 12421, 12973, 13537, 15913, 18481, 20533, 21961, 25741, 27337, 32413, 33301, 36037, 36973, 42841
Offset: 1
Links
- Zak Seidov, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Select[Array[6*#*(#-1)+1 &, 100], PrimeQ] (* Paolo Xausa, Mar 05 2024 *)
-
PARI
for(n=1,150,s=6*n*(n-1)+1; if(isprime(s),print1(s",")))
Comments