OFFSET
1,2
COMMENTS
There is a cycle starting with a(117)=270: ...270,274,273,272,271,270,...
EXAMPLE
a(3)=9 because a(2)=5, prime[5]=11=!=1 (mod 6) and a(3)=a(2)+4
MATHEMATICA
b=1; Prepend[Table[b+=If[Mod[Prime[b], 6]==1, -1, 4], {i, 152}], 1]
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Zak Seidov, Jul 18 2003
STATUS
approved