A173858 Expansion of 4/3 in base phi.

1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0

Offset

1,1

Links

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

Index entries for linear recurrences with constant coefficients, signature (0,1,0,-1,0,1).

Formula

G.f.: x*(1-x^2+x^3+x^4-x^6)/(1-x^2+x^4-x^6). [Bruno Berselli, Apr 06 2012]

a(n) = A000475(n)(mod 2) for n > 3. - John M. Campbell, Jul 14 2016

Mathematica

RealDigits[ 4/3, GoldenRatio, 111][[1]] (* or *)
LinearRecurrence[{0, 1, 0, -1, 0, 1}, {1, 0, 0, 1, 0, 1, 0}, 110] (* Harvey P. Dale, Jun 16 2016 *)

Crossrefs

Sequence in context: A104015 A244465 A214264 * A217586 A359156 A352569

Adjacent sequences: A173855 A173856 A173857 * A173859 A173860 A173861

Keyword

nonn,base,easy

Author

Robert G. Wilson v, Feb 26 2010

Status

approved