A030619 - OEIS

A030619

a(n) = (# 2's)-(# 3's) in first n terms of A030604.

0, 1, 0, 0, 0, 1, 2, 2, 1, 0, 0, 0, 0, -1, -1, 0, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 4, 4, 4, 4, 4, 3, 4, 3, 3, 3, 4, 5, 5, 5, 5, 5, 5, 5, 4, 4, 5, 5, 5, 5, 5, 5, 5, 4, 4, 5, 6, 6, 6, 7, 8, 8, 7, 7, 7, 7, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 5, 4, 4, 5, 5, 5, 6

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,7

LINKS

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

MATHEMATICA

Accumulate[Which[#==2, 1, #==3, -1, True, 0]&/@Flatten[IntegerDigits[#, 6]&/@ Fibonacci[Range[2, 30]]]] (* Harvey P. Dale, Feb 08 2015 *)

CROSSREFS

Cf. A030604.

Sequence in context: A219496 A163534 A255124 * A016370 A334577 A219494

Adjacent sequences: A030616 A030617 A030618 * A030620 A030621 A030622

KEYWORD

sign

AUTHOR

Clark Kimberling

STATUS

approved