OFFSET
1,1
COMMENTS
A family of related sequences can be generated using different positive integers for a(1). (a(1)=1 gives sequence A096216.)
EXAMPLE
a(8)=4 because among the first seven terms, namely 2,0,1,1,3,2,5, there are 4 terms that are relatively prime to 8 (1,1,3 and 5).
MAPLE
a[1]:=2: for n from 2 to 100 do s:=0: for j from 1 to n-1 do if gcd(a[j], n)=1 then s:=s+1 else s:=s fi od: a[n]:=s: od: seq(a[n], n=1..84); # Emeric Deutsch
MATHEMATICA
a[1] = 2; a[n_] := a[n] = Count[ GCD[ Table[ a[i], {i, n - 1}], n], 1]; Array[a, 76] (* Robert G. Wilson v, Dec 27 2005 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Aug 27 2004
EXTENSIONS
More terms from Emeric Deutsch, Aug 03 2005
STATUS
approved