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 A136266 #16 Dec 17 2022 08:22:56
%S A136266 1,0,1,0,1,1,0,1,2,0,1,2,1,0,1,3,1,0,1,3,2,0,1,3,2,1,0,1,3,3,1,0,1,4,
%T A136266 3,1,0,1,4,4,1,0,1,4,4,2,0,1,4,4,2,1,0,1,4,5,2,1,0,1,4,5,3,1,0,1,4,5,
%U A136266 4,1,0,1,4,6,4,1,0,1,5,6,4,1,0,1,5,7,4,1,0,1,5,7,5,1,0,1,5,7,5,2
%N A136266 Expansion of B(x, n) = x*B(x, A004001(n - 1)) + B(x, n - A004001(n - 1)), irregular table read by rows.
%F A136266 B(x, n) = x*B(x, A004001(n - 1)) + B(x, n - A004001(n - 1)).
%e A136266 {1},
%e A136266 {0, 1},
%e A136266 {0, 1, 1},
%e A136266 {0, 1, 2},
%e A136266 {0, 1, 2, 1},
%e A136266 {0, 1, 3, 1},
%e A136266 {0, 1, 3, 2},
%e A136266 {0, 1, 3, 2, 1},
%e A136266 {0, 1, 3, 3, 1},
%e A136266 {0, 1, 4, 3, 1},
%e A136266 {0, 1, 4, 4, 1},
%e A136266 {0, 1, 4, 4, 2},
%e A136266 {0, 1, 4, 4, 2, 1},
%e A136266 {0, 1, 4, 5, 2, 1},
%e A136266 {0, 1, 4, 5, 3, 1},
%e A136266 {0, 1, 4, 5, 4, 1},
%e A136266 {0, 1, 4, 6, 4, 1},
%e A136266 {0, 1, 5, 6, 4, 1},
%e A136266 {0, 1, 5, 7, 4, 1},
%e A136266 {0, 1, 5, 7, 5, 1},
%e A136266 {0, 1, 5, 7, 5, 2}
%t A136266 Conway[0] = 1; Conway[1] = 1; Conway[2] = 1;
%t A136266 Conway[n_] := Conway[n] = Conway[Conway[n - 1]] + Conway[n - Conway[n - 1]];
%t A136266 B[x, 0] = 1; B[x, 1] = x;
%t A136266 B[x_, n_] := B[x, n] = x*B[x, Conway[n - 1]] + B[x, n - Conway[n - 1]];
%t A136266 Table[ExpandAll[B[x, n]], {n, 0, 10}];
%t A136266 a = Table[CoefficientList[B[x, n], x], {n, 0, 10}]
%t A136266 Flatten[a]
%Y A136266 Cf. A004001.
%K A136266 nonn,uned,less,tabf
%O A136266 1,9
%A A136266 _Roger L. Bagula_, Mar 18 2008