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 A056180 #4 Sep 23 2016 16:10:57 %S A056180 1,2,4,7,14,24,40,63,95,140,201,281,384,516,682,888,1141,1449,1820, %T A056180 2263,2789,3408,4133,4976,5951,7074,8360,9826,11492,13376,15499,17884, %U A056180 20554,23533,26849,30528,34600,39095,44045,49485,55450,61976,69103 %N A056180 Sum of a(n) terms of 1/k^(4/5) first exceeds n. %t A056180 s = 0; k = 1; Do[ While[ s <= n, s = s + N[ 1/k^(4/5), 24 ]; k++ ]; Print[ k - 1 ], {n, 1, 50} ] %t A056180 Join[{1},Table[Position[Accumulate[Table[N[1/k^(4/5)],{k,100000}]],_?(#>n&),{1},1],{n,50}]//Flatten] (* _Harvey P. Dale_, Sep 23 2016 *) %Y A056180 Cf. A019529 and A002387. %K A056180 nonn %O A056180 0,2 %A A056180 _Robert G. Wilson v_, Aug 01 2000