%I A072441
%S A072441 1,3,4,7,9,13,16,20,25,30,36,42,49,56,64,72,81,90,100,110,120,132,143,
%T A072441 155,168,181,195,209,224,239,255,271,288,305,323,341,359,379,398,419,
%U A072441 439,460,482,504,527,550,574,598,623,648,674,700,727,754,781,810,838
%N A072441 Least k such that Sum( Sin(1/Sqrt(i)) i=1..k) > n.
%F A072441 a(n) is asymptotic to n^2/4. Does lim n -> infinity ABS(4*a(n)-(n+1)^2)/
n exist? - Benoit Cloitre (benoit7848c(AT)orange.fr), Aug 16 2002
%t A072441 f[n_] := Block[{k = 1, s = 0}, While[s < n, s = s + Sin[1/Sqrt[k]]; k++
]; k]; Table[ f[n], {n, 0, 60} ]
%Y A072441 Sequence in context: A005539 A053099 A073273 this_sequence A152032 A004652
A061568
%Y A072441 Adjacent sequences: A072438 A072439 A072440 this_sequence A072442 A072443
A072444
%K A072441 nonn
%O A072441 0,2
%A A072441 Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 01 2002
|