OFFSET
1,1
COMMENTS
Same as asking when the second difference of A054040 is -1.
EXAMPLE
MATHEMATICA
k = s = a = b = c = 0; Do[m = n; While[s < n, k++; s = N[s + 1/Sqrt[k], 50]]; a = b; b = c; c = k; If[2b - a > c, Print[n]], {n, 1, 4400}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Apr 14 2003
STATUS
approved