login
Numbers n such that A007953(n) >= A007953(n^3), where A007953 = digital sum in base 10.
1

%I #8 Mar 30 2012 17:23:05

%S 0,1,8,10,80,100,171,378,468,487,577,585,586,587,684,800,1000,1710,

%T 3780,4680,4870,4877,5770,5850,5851,5860,5868,5870,6840,8000,10000,

%U 15877,17100,28845,28847,28885,28887,37800,46800,46877,48700,48770,48784,49468

%N Numbers n such that A007953(n) >= A007953(n^3), where A007953 = digital sum in base 10.

%C When n is in the sequence, then 10n is in the sequence, too.

%F A204324 = A064209 union A070276.

%o (PARI) for(n=0,1e6, A007953(n)>=A007953(n^3)&print1(n","))

%Y Cf. A064399, A064209, A064210.

%K nonn,base

%O 1,3

%A _M. F. Hasler_, Jan 14 2012