A135050 Numbers k such that sum of digits of k^3 is 8. Multiples of 10 are omitted.

2, 5, 8, 11, 101, 1001, 10001, 100001, 1000001, 10000001, 100000001, 1000000001, 10000000001, 100000000001, 1000000000001, 10000000000001, 100000000000001, 1000000000000001, 10000000000000001, 100000000000000001, 1000000000000000001, 10000000000000000001

Offset

1,1

Comments

All numbers of form 10..01 are eligible. Are there larger terms of other forms?

All terms up to 10^20 are of this form, except for 2, 5 and 8. - Max Alekseyev, Feb 11 2008

Numbers k such that k > 1 and sum of digits of k^3 is less than 9. Multiples of 10 are omitted. - Farideh Firoozbakht, Oct 18 2013

Links

Table of n, a(n) for n=1..22.

Example

2^3=8, 5^3=125, 8^3=512, 11^3=1331, 101^3=1030301, 1001^3=1003003001, 10001^3=1000300030001.

Mathematica

Do[If[Total[IntegerDigits[m^3]]==8&&Mod[m, 10]>0, Print[m]], {m, 100000}]

Prog

(PARI) isok(k) = (k % 10) && (sumdigits(k^3) == 8); \\ Michel Marcus, Feb 19 2021

Crossrefs

Sequence in context: A246442 A056661 A229883 * A004112 A024815 A073837

Adjacent sequences: A135047 A135048 A135049 * A135051 A135052 A135053

Keyword

nonn,base

Author

Zak Seidov, Feb 11 2008

Extensions

a(9) onwards from Max Alekseyev, Feb 11 2008

Status

approved