A132233 Primes congruent to 13 (mod 30).

13, 43, 73, 103, 163, 193, 223, 283, 313, 373, 433, 463, 523, 613, 643, 673, 733, 823, 853, 883, 1033, 1063, 1093, 1123, 1153, 1213, 1303, 1423, 1453, 1483, 1543, 1663, 1693, 1723, 1753, 1783, 1873, 1933, 1993, 2053, 2083, 2113, 2143, 2203, 2293, 2383

Offset: 1

Author

Omar E. Pol, Aug 15 2007

Keywords

• nonn
• easy

Comments

Primes ending in 3 with (SOD-1)/3 integer where SOD is sum of digits. - Ki Punches

Subsequence of primes of A082369. - Michel Marcus, Jan 23 2016

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000
• C. K. Caldwell, The Prime Pages.
• Omar E. Pol, Determinacion geometrica de los numeros primos y perfectos.

Crossrefs

Cf. A000040, A039949, A082369, A132230-A132236.

Programs

Magma

[p: p in PrimesUpTo(3000) | p mod 30 eq 13 ]; // Vincenzo Librandi, Aug 14 2012

Maple

select(isprime, [seq(30*i+13,i=0..1000)]); # Robert Israel, Jan 24 2016

Mathematica

Select[Prime[Range[1000]],MemberQ[{13},Mod[#,30]]&] (* Vincenzo Librandi, Aug 14 2012 *)

PARI

lista(nn) = forprime(p=2, nn, if(p % 30 == 13, print1(p, ", "))); \\ Altug Alkan, Jan 23 2016

Formula

a(n) = A158746(n)*30 + 13. - Ray Chandler, Apr 07 2009

Intersection of A030431 and A002476. - Ray Chandler, Apr 07 2009

Extensions

Extended by Ray Chandler, Apr 07 2009