OFFSET
1,1
COMMENTS
A subsequence of A185934.
PROG
(PARI) s=Mod([1, 1, 1], 3); o=vector(3); i=0; forprime( p=1, 1e4, o[i++%3+1]=p; o-s | print1( o[(i+1)%3+1]", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
M. F. Hasler, Feb 06 2011
STATUS
approved