A303740 Primes of the form 9*k^2 + 3*k + 1 (A082040).

13, 43, 157, 241, 463, 601, 757, 1123, 2971, 3307, 4423, 4831, 5701, 6163, 8191, 9901, 11131, 12433, 13807, 19183, 20023, 21757, 22651, 23563, 26407, 28393, 35911, 37057, 53593, 60763, 78121, 83233, 95791, 113233, 117307, 121453, 123553, 127807, 136531

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Maple

select(isprime, [seq(9*n^2+3*n+1, n=0..500)]);

Mathematica

Select[Table[9 n^2 + 3 n + 1, {n, 0, 150}], PrimeQ] (* Vincenzo Librandi, Jun 25 2018 *)

Prog

(GAP) Filtered(List([0..300], n->9*n^2+3*n+1), IsPrime);
(Magma) [a: n in [0..200] | IsPrime(a) where a is 9*n^2 +3*n+1 ]; // Vincenzo Librandi, Jun 25 2018

Crossrefs

Cf. A303739. Subsequence of A082040.

Sequence in context: A225774 A268256 A243894 * A243029 A243030 A243031

Adjacent sequences: A303737 A303738 A303739 * A303741 A303742 A303743

Keyword

nonn,easy

Author

Muniru A Asiru, Jun 01 2018

Status

approved