login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A014885 n is equal to the number of 1's in all numbers <= n written in base 8. 0
1, 8177, 8178, 8179, 8180, 8181, 8182, 8183, 8184, 8192, 8193, 49137, 49138, 49139, 49140, 49141, 49142, 49143, 49144, 90112, 90113, 322096, 1048576, 1048577, 1056753, 1056754, 1056755, 1056756, 1056757, 1056758, 1056759, 1056760, 1056768, 1056769, 1097713, 1097714, 1097715, 1097716, 1097717, 1097718, 1097719, 1097720, 1138688, 1138689, 2396744 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

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

MAPLE

T:= 0: R:= NULL:

for n from 1 to (8^8-1)/(8-1) do

  T:= T + numboccur(1, convert(n, base, 8));

  if T = n then R:= R, n; count:= count+1;

fi od:

R; # Robert Israel, Dec 01 2020

MATHEMATICA

Module[{nn=106*10^4, n1s}, n1s=Accumulate[Table[DigitCount[n, 8, 1], {n, nn}]]; Position[Thread[{n1s, Range[nn]}], _?(#[[1]]==#[[2]]&), 1, Heads-> False]]// Flatten (* Harvey P. Dale, Feb 28 2020 *)

CROSSREFS

Cf. A014778.

Sequence in context: A096329 A126823 A205092 * A252217 A351448 A235095

Adjacent sequences:  A014882 A014883 A014884 * A014886 A014887 A014888

KEYWORD

nonn,base,fini,full

AUTHOR

Olivier Gérard

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 28 07:30 EDT 2022. Contains 354112 sequences. (Running on oeis4.)