OFFSET
1,1
FORMULA
MATHEMATICA
t=Flatten[Position[Table[GCD[w, 210], {w, 1, 210}], 1]] t2=Intersection[t, t+6]-6
CROSSREFS
KEYWORD
fini,full,nonn
AUTHOR
Labos Elemer, Dec 13 2002
STATUS
approved