This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A056178 #6 Mar 16 2015 16:59:41 %S A056178 1,2,3,6,10,15,22,31,42,56,71,90,112,137,165,197,233,272,317,365,419, %T A056178 477,541,610,685,766,853,946,1045,1152,1265,1386,1514,1650,1793,1945, %U A056178 2105,2274,2451,2637,2833,3038,3252,3477,3711,3956,4212,4478,4755,5043 %N A056178 Sum of a(n) terms of 1/k^(2/3) first exceeds n. %t A056178 s = 0; k = 1; Do[ While[ s <= n, s = s + N[ 1/k^(2/3), 24 ]; k++ ]; Print[ k - 1 ], {n, 1, 75} ] %t A056178 Flatten[Table[Position[Accumulate[Table[1/k^(2/3),{k,5100}]],_?(#>n&),{1}, 1],{n, 0,50}]] (* _Harvey P. Dale_, Mar 16 2015 *) %Y A056178 Cf. A019529 and A002387. %K A056178 nonn %O A056178 0,2 %A A056178 _Robert G. Wilson v_, Aug 01 2000