login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A220115 a(n) = A000120(n) - A007895(n), the number of 1's in binary expansion of n minus the number of terms in Zeckendorf representation of n. 4
0, 0, 0, 1, -1, 1, 0, 1, 0, 0, 0, 1, -1, 2, 1, 2, -1, -1, 0, 0, -1, 2, 1, 2, 0, 0, 1, 1, 0, 2, 1, 2, -2, -2, 1, 1, 0, 1, 0, 2, -1, 0, 1, 1, 0, 1, 0, 3, -1, 0, 0, 0, 0, 0, 0, 4, 1, 2, 2, 2, 2, 2, 2, 4, -2, -1, -1, -1, 0, 0, 0, 1, -2, 0, -1, 0, 1, 1, 1, 2, -2 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,14

LINKS

Amiram Eldar, Table of n, a(n) for n = 0..10000

FORMULA

a(n) = A000120(n) - A007895(n).

EXAMPLE

a(4) = A000120(4) - A007895(4) = 1 - 2 = -1.

MATHEMATICA

zeck = DigitCount[Select[Range[0, 500], BitAnd[#, 2*#] == 0&], 2, 1]; DigitCount[Range[0, Length[zeck]-1], 2, 1] - zeck (* Jean-Fran├žois Alcover, Jan 25 2018 *)

CROSSREFS

Cf. A000120, A007895.

Sequence in context: A059782 A093654 A342627 * A039924 A275346 A037888

Adjacent sequences:  A220112 A220113 A220114 * A220116 A220117 A220118

KEYWORD

base,sign,easy

AUTHOR

Alex Ratushnyak, Dec 05 2012

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 23 17:11 EDT 2021. Contains 345402 sequences. (Running on oeis4.)