login
A204324
Numbers n such that A007953(n) >= A007953(n^3), where A007953 = digital sum in base 10.
1
0, 1, 8, 10, 80, 100, 171, 378, 468, 487, 577, 585, 586, 587, 684, 800, 1000, 1710, 3780, 4680, 4870, 4877, 5770, 5850, 5851, 5860, 5868, 5870, 6840, 8000, 10000, 15877, 17100, 28845, 28847, 28885, 28887, 37800, 46800, 46877, 48700, 48770, 48784, 49468
OFFSET
1,3
COMMENTS
When n is in the sequence, then 10n is in the sequence, too.
FORMULA
PROG
(PARI) for(n=0, 1e6, A007953(n)>=A007953(n^3)&print1(n", "))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Jan 14 2012
STATUS
approved