A244741 Numbers k such that (prime(k) mod 5) == 2 (mod 3).

1, 4, 7, 12, 15, 19, 25, 28, 31, 33, 37, 39, 45, 49, 55, 59, 63, 66, 68, 69, 73, 78, 88, 91, 93, 101, 102, 106, 107, 111, 113, 118, 123, 129, 134, 138, 139, 144, 148, 151, 154, 155, 159, 161, 163, 165, 168, 181, 184, 187, 195, 199, 203, 206, 211, 214, 217

Offset: 1

Author

Clark Kimberling, Jul 05 2014

Keywords

• nonn
• easy

Comments

Every positive integer is in exactly one of the sequences A244739, A024707, A244741.

Examples

			n ... prime(n) mod 5 mod 3
1 ..... 2 ..... 2 ... 2
2 ..... 3 ..... 3 ... 0
3 ..... 5 ..... 0 ... 0
4 ..... 7 ..... 2 ... 2
5 ..... 11 .... 1 ... 1
6 ..... 13 .... 3 ... 0
		

Links

• Clark Kimberling, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A039703, A244738, A244739, A024707, A244735. Essentially the same as A049509.

Programs

Maple

A244741:=n->`if`(((ithprime(n) mod 5) mod 3) = 2, n, NULL): seq(A244741(n), n=1..250); # Wesley Ivan Hurt, Jul 06 2014

Mathematica

z = 300; u = Mod[Table[Mod[Prime[n], 5], {n, 1, z}], 3] (* A244738 *)
v1 = Flatten[Position[u, 0]]  (* A244739 *)
v2 = Flatten[Position[u, 1]]  (* A024707 *)
v3 = Flatten[Position[u, 2]]  (* A244741 *)