OFFSET
1,1
COMMENTS
Numbers n for which A001223(n) = 0 modulo 3.
Equivalently, numbers n for which prime(n+1)-prime(n) is a multiple of six. See A276414 for runs of increasing length of consecutive integers. - M. F. Hasler, Sep 03 2016
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..10000
Terence Tao, Biases between consecutive primes, blog entry March 14, 2016
EXAMPLE
MATHEMATICA
Select[Range@ 210, Divisible[Prime[# + 1] - Prime@ #, 3] &] (* Michael De Vlieger, Mar 17 2016 *)
PrimePi/@Select[Partition[Prime[Range[350]], 2, 1], Divisible[#[[2]]-#[[1]], 3]&][[All, 1]] (* Harvey P. Dale, Jul 11 2017 *)
PROG
(Scheme, with Antti Karttunen's IntSeq-library)
(PARI) isok(n) = ((prime(n+1) - prime(n)) % 3) == 0; \\ Michel Marcus, Mar 17 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Mar 16 2016
STATUS
approved