login
A244741
Numbers k such that (prime(k) mod 5) == 2 (mod 3).
4
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,2
COMMENTS
Every positive integer is in exactly one of the sequences A244739, A024707, A244741.
LINKS
EXAMPLE
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
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 *)
CROSSREFS
Cf. A039703, A244738, A244739, A024707, A244735. Essentially the same as A049509.
Sequence in context: A276875 A310771 A310772 * A049509 A026360 A237514
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Jul 05 2014
STATUS
approved