A034135 Decimal part of cube root of n starts with 9: first term of runs.
7, 25, 60, 118, 206, 329, 494, 705, 971, 1296, 1686, 2147, 2686, 3308, 4020, 4827, 5736, 6752, 7881, 9130, 10504, 12009, 13652, 15439, 17374, 19466, 21718, 24138, 26731, 29504, 32462, 35612, 38959, 42509, 46269, 50244, 54440, 58864, 63522
Offset: 1
Crossrefs
Cf. A034125.
Programs
-
Mathematica
First /@ Split[Select[Range[63600], First[RealDigits[#^(1/3), 10, 1, -1]] == {9} &], #2 - #1 <= 1 &] (* Jayanta Basu, Jun 17 2013 *) Table[Ceiling[(n + 9/10)^3], {n, 39}] (* T. D. Noe, Jun 17 2013 *)