A034120 Fractional part of cube root of a(n) starts with digit 4.

3, 14, 15, 40, 41, 42, 86, 87, 88, 89, 90, 91, 158, 159, 160, 161, 162, 163, 164, 165, 166, 263, 264, 265, 266, 267, 268, 269, 270, 271, 272, 273, 274, 406, 407, 408, 409, 410, 411, 412, 413, 414, 415, 416, 417, 418, 419, 420, 421, 593, 594, 595, 596, 597

Offset

1,1

Links

Matthew House, Table of n, a(n) for n = 1..10000

Mathematica

Select[Range[600], NumberDigit[CubeRoot[#], -1]==4&] (* Harvey P. Dale, Sep 18 2023 *)

Prog

(PARI) isok(n) = my(f = floor(10*frac(sqrtn(n, 3)))); (f > 0) && digits(f)[1] == 4; \\ Michel Marcus, Feb 15 2017

Crossrefs

Cf. A034130.

Sequence in context: A178363 A294997 A354740 * A303222 A037244 A016062

Adjacent sequences: A034117 A034118 A034119 * A034121 A034122 A034123

Keyword

nonn,easy,base

Author

Patrick De Geest, Sep 15 1998

Extensions

Offset corrected by Matthew House, Feb 14 2017

Status

approved