A014884 - OEIS

%I #10 Dec 02 2020 09:42:14

%S 1,102772,102773,102774,102775,102776,102777,102778,102779,102780,

%T 142155,142156,737002,737003,737004,737005,737006,737007,737008,

%U 737009,737010,1594323,1594324,1697095,1697096,1697097,1697098

%N n is equal to the number of 1's in all numbers <= n written in base 9.

%H Robert Israel, <a href="/A014884/b014884.txt">Table of n, a(n) for n = 1..49</a>

%p T:= 0: R:= NULL:

%p for n from 1 to 6*10^6 do

%p   T:= T + numboccur(1,convert(n,base,9));

%p   if T = n then R:= R, n fi

%p od:

%p R; # _Robert Israel_, Dec 01 2020

%Y Cf. A014778.

%K nonn,base,fini,full

%O 1,2

%A _Olivier Gérard_