This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A030324 #30 Feb 05 2023 09:20:24 %S A030324 1,1,0,1,1,1,0,1,1,0,0,0,1,1,0,1,1,0,1,0,1,1,0,0,0,1,0,1,1,0,1,1,1,1, %T A030324 0,1,1,0,0,1,1,0,0,1,0,0,0,0,1,1,1,0,1,0,0,1,1,0,1,1,1,1,0,0,1,1,0,0, %U A030324 1,1,0,0,0,1,0,1,1,1,1,0,1,1,0,1,1,1,1,0,0,0 %N A030324 Triangle read by rows, where row k consists of the binary digits of Fibonacci(k+1). %H A030324 Robert Israel, <a href="/A030324/b030324.txt">Table of n, a(n) for n = 1..10098</a> (rows 1 to 170, flattened) %e A030324 Triangle starts %e A030324 1 %e A030324 1, 0 %e A030324 1, 1 %e A030324 1, 0, 1 %e A030324 1, 0, 0, 0 %e A030324 1, 1, 0, 1 %e A030324 1, 0, 1, 0, 1 %e A030324 1, 0, 0, 0, 1, 0 %p A030324 for n from 2 to 30 do %p A030324 ListTools:-Reverse(convert(combinat:-fibonacci(n),base,2)) %p A030324 od; # _Robert Israel_, Sep 12 2018 %t A030324 Flatten[Map[IntegerDigits[#, 2] &, Table[Fibonacci[n], {n, 50}], {1}]] (* _Ben Branman_, Feb 14 2011 *) %t A030324 IntegerDigits[#,2]&/@Fibonacci[Range[2,20]]//Flatten (* _Harvey P. Dale_, May 29 2021 *) %Y A030324 Cf. A000045, A004685, A272170 (second column). %K A030324 nonn,base,tabf %O A030324 1,1 %A A030324 _Clark Kimberling_ %E A030324 Edited by _Robert Israel_, Sep 12 2018