A147603 Primes congruent to (1,1,2) mod 3, see comment.

7, 13, 17, 19, 31, 41, 43, 61, 71, 73, 79, 83, 97, 103, 107, 109, 127, 131, 139, 151, 167, 181, 193, 197, 199, 211, 227, 229, 241, 251, 271, 277, 281, 283, 307, 311, 313, 331, 347, 349, 367, 383, 397, 409, 419, 421, 433, 443, 457, 463, 467, 487, 499, 503, 523

Offset

1,1

Comments

Primes in increasing order such that, for k=0,1,2,...:

a(3k+1) = primes congruent to 1 mod 3,

a(3k+2) = primes congruent to 1 mod 3,

a(3k+3) = primes congruent to 2 mod 3.

Prime analog to A147534 Numbers congruent to (1,1,2) mod 3.

Links

Table of n, a(n) for n=1..55.

Mathematica

s={}; n3=1; Do[Do[If[Mod[p=Prime[n], 3]==1, AppendTo[s, p]; n1=n+1; Break[]], {n, n3, 1000}]; Do[If[Mod[p=Prime[n], 3]==1, AppendTo[s, p]; n2=n+1; Break[]], {n, n1, 1000}]; Do[If[Mod[p=Prime[n], 3]==2, AppendTo[s, p]; n3=n+1; Break[]], {n, n2, 1000}], {55}]; s

Crossrefs

A147534

Sequence in context: A053176 A032669 A231607 * A106084 A110053 A276045

Adjacent sequences: A147600 A147601 A147602 * A147604 A147605 A147606

Keyword

nonn

Author

Zak Seidov, Nov 08 2008

Status

approved