cp's OEIS Frontend

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.

A167634 Triangle read by rows: T(n,k) is the number of Dyck paths of semilength n, having no ascents and no descents of length 1, and having k peaks at odd level.

This page as a plain text file.
%I A167634 #5 Nov 24 2019 23:48:13
%S A167634 1,0,1,0,1,2,0,0,3,1,5,2,1,1,10,5,1,14,12,9,2,7,38,27,9,1,43,60,57,22,
%T A167634 3,36,156,146,69,15,1,143,284,326,176,45,4,166,672,784,482,155,23,1,
%U A167634 509,1320,1780,1224,453,82,5,731,2981,4162,3160,1354,313,33,1,1915,6104
%N A167634 Triangle read by rows: T(n,k) is the number of Dyck paths of semilength n, having no ascents and no descents of length 1, and having k peaks at odd level.
%C A167634 Sum of entries in row n is the secondary structure number A004148(n-1) (n >= 2).
%C A167634 Row n contains ceiling(n/2) entries (n >= 1).
%C A167634 T(n,0) = A167635(n).
%C A167634 Sum_{k>=0} k*T(n,k) = A167636(n).
%F A167634 G.f.: G=G(t,z) satisfies z(1+z-z^2)G^2-(1+z-z^2)(1+z-tz^2)G + 1+z-tz^2=0.
%F A167634 The trivariate g.f. G=G(t,s,z), where t marks odd-level peaks, s marks even-level peaks, and z marks semilength, satisfies aG^2 - bG + c = 0, where a = z(1+z-sz^2), b=(1+z-tz^2)(1+z-sz^2), c=1+z-tz^2.
%e A167634 T(5,1)=3 because we have UUDDUU(UD)DD, UU(UD)DDUUDD, and UUUU(UD)DDDD (the odd-level peaks are shown between parentheses).
%e A167634 Triangle starts:
%e A167634    1;
%e A167634    0;
%e A167634    1;
%e A167634    0,  1;
%e A167634    2,  0;
%e A167634    0,  3,  1;
%e A167634    5,  2,  1;
%e A167634    1, 10,  5,  1;
%e A167634   14, 12,  9,  2;
%p A167634 eq := z*(1+z-z^2)*G^2-(1+z-z^2)*(1+z-t*z^2)*G+1+z-t*z^2 = 0: G := RootOf(eq, G): Gser := simplify(series(G, z = 0, 20)): for n from 0 to 16 do P[n] := sort(expand(coeff(Gser, z, n))) end do: 1; for n to 16 do seq(coeff(P[n], t, j), j = 0 .. ceil((1/2)*n)-1) end do; # yields sequence in triangular form
%Y A167634 Cf. A004148, A167635, A167636, A167637.
%K A167634 nonn,tabf
%O A167634 0,6
%A A167634 _Emeric Deutsch_, Nov 08 2009