A030371 a(n)=(# 1's)-(# 0's) in first n terms of A030363.

1, 1, 2, 1, 2, 2, 2, 2, 3, 4, 5, 5, 6, 5, 6, 5, 5, 6, 6, 5, 4, 5, 6, 5, 4, 4, 4, 5, 5, 6, 5, 4, 4, 4, 5, 5, 5, 6, 7, 8, 8, 8, 8, 8, 9, 10, 11, 11, 12, 13, 14, 13, 12, 13, 13, 12, 12, 11, 12, 12, 11, 12, 13, 14, 13, 14, 15, 15, 15, 14, 15, 16, 16, 16, 15

Offset

1,3

Links

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

Mathematica

Accumulate[Flatten[IntegerDigits[Fibonacci[Range[2, 30]], 3]]/.{0->-1, 2->0}] (* Harvey P. Dale, Jan 16 2020 *)

Crossrefs

Sequence in context: A029215 A240649 A226942 * A029550 A091110 A339660

Adjacent sequences: A030368 A030369 A030370 * A030372 A030373 A030374

Keyword

nonn

Author

Clark Kimberling

Status

approved