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 A337635 #12 Feb 05 2023 01:59:33
%S A337635 1,1,1,1,2,2,2,3,3,3,3,4,4,4,4,4,5,5,6,6,6,6,6,6,7,7,8,8,8,9,9,9,9,10,
%T A337635 10,10,10,11,11,12,12,12,13,13,13,13,13,14,14,14,14,15,15,15,16,16,16,
%U A337635 16,17,17,18,18,18,19,19,19,19,19,20,20,20,20,21,21,21,21,22,22,22,22
%N A337635 Number of numbers k <= n such that k is in A095096 and k+1 is in A020899.
%D A337635 Anton Shutov, On the sum of digits of the Zeckendorf representations of two consecutive numbers, Fib. Q., 58:3 (2020), 203-207.
%H A337635 Amiram Eldar, <a href="/A337635/b337635.txt">Table of n, a(n) for n = 0..10000</a>
%t A337635 s = SequencePosition[Mod[DigitCount[Select[Range[0, 400], BitAnd[#, 2 #] == 0 &], 2, 1], 2], {0, 1}][[;; , 1]] - 1; t = Table[0, {s[[-1]] + 1}]; t[[s + 1]] = 1; Accumulate[t] (* _Amiram Eldar_, Feb 05 2023 *)
%Y A337635 Cf. A020899, A095096, A337287, A337288, A337289, A337290, A337634, A337636, A337637.
%K A337635 nonn,base
%O A337635 0,5
%A A337635 _N. J. A. Sloane_, Sep 12 2020
%E A337635 Offset corrected by _Amiram Eldar_, Feb 05 2023