A034116 Fractional part of cube root of a(n) starts with digit 0 (cubes excluded).
9, 28, 29, 65, 66, 67, 68, 126, 127, 128, 129, 130, 131, 132, 217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 344, 345, 346, 347, 348, 349, 350, 351, 352, 353, 354, 355, 356, 357, 513, 514, 515, 516, 517, 518, 519, 520, 521, 522, 523, 524, 525, 526, 527
Offset: 1
Crossrefs
Cf. A034126.
Programs
-
Mathematica
Select[Range[600],!IntegerQ[CubeRoot[#]]&&NumberDigit[N[CubeRoot[#]],-1]==0&] (* Harvey P. Dale, Apr 22 2024 *)