A030330 - OEIS

%I #6 May 29 2021 19:25:40

%S 1,2,1,2,3,4,3,4,5,4,3,2,3,4,3,4,5,4,5,4,5,6,5,4,3,4,3,4,5,4,5,6,7,8,

%T 7,8,9,8,7,8,9,8,7,8,7,6,5,4,5,6,7,6,7,6,5,6,7,6,7,8,9,10,9,8,9,10,9,

%U 8,9,10,9,8,7,8,7,8,9,10,11,10,11,12,11,12,13

%N (# 1's)-(# 0's) in first n terms of A030324.

%t Accumulate[Flatten[IntegerDigits[#,2]&/@Fibonacci[Range[2,20]]]/.(0->-1)] (* _Harvey P. Dale_, May 29 2021 *)

%K nonn

%O 1,2

%A _Clark Kimberling_