OFFSET
1,2
EXAMPLE
a(7)=3 because for k=1,2,...,7 we have gcd(k,ceiling(7/k))=1,2,3,2,1,2,1, respectively.
MAPLE
a:=proc(n) local ct, k: ct:=0: for k from 1 to n do if gcd(k, ceil(n/k))=1 then ct:=ct+1 else ct:=ct fi od: end: seq(a(n), n=1..85); # Emeric Deutsch, Jul 23 2006
MATHEMATICA
Table[Length[Select[Table[GCD[k, Ceiling[n/k]], {k, 1, n}], # == 1 &]], {n, 1, 80}] (* Stefan Steinerberger, Jul 23 2006 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Jul 12 2006
EXTENSIONS
More terms from Emeric Deutsch and Stefan Steinerberger Jul 23 2006
Edited by N. J. A. Sloane at the suggestion of Andrew S. Plewe, Jun 12 2007
STATUS
approved