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 A358467 #16 Nov 18 2022 10:13:41
%S A358467 1,1,0,1,0,1,0,1,1,1,1,0,0,2,4,3,6,7,8,11,13,15,17,16,19,20,23,23,23,
%T A358467 23,25,27,30,33,33,35,37,39,45,48,48,47,49,50,52,57,61,64,64,67,67,72,
%U A358467 77,79,80,84,86,91,91,95,100,107,109,111,118,123,127,134,138,143,148,153,158,165,171,176,179,184,187,192,195
%N A358467 Number of 1's that appeared in the n-th step when constructing A030717.
%C A358467 Also first differences of A358466.
%H A358467 Michael De Vlieger, <a href="/A358467/b358467.txt">Table of n, a(n) for n = 1..1024</a>
%t A358467 nn = 94; c[_] = 0; k = a[1] = c[1] = 1; Prepend[Reap[Do[w = Union@ Array[a, k]; t = 0; Do[Set[a[j + k], c[w[[j]]]]; If[a[j + k] == 1, t++], {j, Length[w]}]; Do[c[a[j + k]]++, {j, Length[w]}]; k += Length[w]; Sow[t], {n, nn}]][[-1, -1]], 1] (* _Michael De Vlieger_, Nov 18 2022 *)
%Y A358467 Cf. A030717, A358466, A358469.
%K A358467 nonn
%O A358467 1,14
%A A358467 _Seiichi Manyama_, Nov 18 2022