A064210 Numbers n such that sum of the digits of n is >= the sum of the digits of n^4.

1, 7, 10, 19, 67, 70, 100, 190, 670, 700, 1000, 1900, 6700, 7000, 10000, 19000, 67000, 70000, 100000, 124499, 190000, 670000, 700000, 1000000, 1244990, 1900000, 6700000, 7000000, 10000000, 12449900, 19000000, 67000000, 70000000, 100000000

Offset: 1

Author

Robert G. Wilson v, Sep 21 2001

Keywords

• base
• nonn

Comments

If n is in the sequence, so is 10n. See A122484 for the subsequence of terms not ending in "0". [Charles R Greathouse IV, Jan 12 2012]

Programs

Mathematica

Select[ Range[ 10^7 ], Apply[ Plus, IntegerDigits[ # ]] >= Apply[ Plus, IntegerDigits[ #^4 ]] & ]

Extensions

More terms from Martin Raab, Aug 08 2006