OFFSET
1,1
COMMENTS
Numbers not present: 10, 11, 29, 31, 36, 41, 48, 51, 54, 58, 62, 65, 68, ...,. - Robert G. Wilson v, Sep 03 2004
MAPLE
A family of related sequences can be generated using different positive integers for a(1). (a(1)=1 gives sequence A096216.)
MATHEMATICA
a[1] = 6; a[n_] := a[n] = Count[ GCD[n, Table[ a[i], {i, n - 1}]], 1]; Table[ a[n], {n, 76}] (* Robert G. Wilson v, Sep 03 2004 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Aug 30 2004
EXTENSIONS
More terms from Robert G. Wilson v, Sep 03 2004
STATUS
approved