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.

Showing 1-4 of 4 results.

A006958 Number of parallelogram polyominoes with n cells (also called staircase polyominoes, although that term is overused).

Original entry on oeis.org

1, 2, 4, 9, 20, 46, 105, 242, 557, 1285, 2964, 6842, 15793, 36463, 84187, 194388, 448847, 1036426, 2393208, 5526198, 12760671, 29466050, 68041019, 157115917, 362802072, 837759792, 1934502740, 4467033943, 10314998977, 23818760154, 55000815222, 127004500762
Offset: 1

Views

Author

Keywords

Comments

Same as: number of skew Ferrers diagrams. - Joerg Arndt, Mar 18 2014
A coin fountain is an arrangement of coins in numbered rows such that the bottom row (row 0) contains contiguous coins and such that each coin in a higher row touches exactly two coins in the next lower row. See A005169. a(n) equals the number of coin fountains with exactly n coins in the even-numbered rows of the fountain. See the illustration in the Links section. See A161492 for a refinement of this sequence. - Peter Bala, Jul 20 2019

Examples

			G.f. may be expressed by the continued fraction: 1/(1-x/(1-x/(1-x^2/(1-x^2/(1-x^3/(1-x^3/(1-x^4/(1-...)))))))) = 1 + x + 2*x^2 + 4*x^3 + 9*x^4 + 20*x^5 + 46*x^6 + 105*x^7 + ...
From _Michael B. Porter_, Sep 21 2016; corrected by _Riccardo Moschetti_, Aug 11 2017: (Start)
Here are the nine parallelogram polyominoes with 4 cells, i.e., polygons convex according to the -45-degree direction, according to "Polya Festoons" of P. Flajolet:
                          _      _  _
             _  _     _ /_ /   /_ /_ /
         _ /_ /_ /  /_ /_ /   /_ /      _  _  _  _
       /_ /_ /     /_ /      /_ /     /_ /_ /_ /_ /
                     _
              _    /_ /    _  _  _            _  _
            /_ /  /_ /   /_ /_ /_ /    _    /_ /_ /
         _ /_ /  /_ /   /_ /    _  _ /_ /  /_ /_ /
       /_ /_ /  /_ /          /_ /_ /_ /
(End)
		

References

  • Steven R. Finch, Mathematical Constants, Encyclopedia of Mathematics and its Applications, vol. 94, Cambridge University Press, 2003, Section 5.19, p. 380.
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Crossrefs

Programs

  • Maple
    N:= 100: # to get a(1) to a(N)
    M:= ceil(sqrt(N+1)):
    C:= 1:
    for j from M to 1 by -1 do C:= 1/(1-x^j/(1-x^j*C)) od:
    S:= series(C,x,N+1):
    seq(coeff(S,x,j),j=1..N); # Robert Israel, Sep 20 2016
  • Mathematica
    NN = 100; (* to get a(1) to a(NN) *) M = Ceiling[Sqrt[NN+1]]; c = 1; For[j = M, j >= 1, j--, c = 1/(1-x^j/(1-x^j*c))]; c = Series[c, {x, 0, NN+1}]; CoefficientList[c, x][[2 ;; NN+1]] (* Jean-François Alcover, Sep 27 2016, adapted from Robert Israel's Maple code *)
    nmax = 40; CoefficientList[Series[1/Fold[(1 - #2/#1) &, 1, Reverse[x^(Range[nmax + 1] - Floor[Range[nmax + 1]/2])]], {x, 0, nmax}], x] (* Vaclav Kotesovec, Sep 05 2017 *)
  • PARI
    {a(n)=local(CF=1+x*O(x^n),m); for(k=0,n\2,m=n\2-k+1;CF=(1-x^((m+1)\2)/CF));polcoeff(1/CF,n)} \\ Paul D. Hanna, May 14 2005
    
  • PARI
    /* From the Delest/Fedou reference: */
    N=44;  q='q+O('q^N);  t=1;
    qn(n) = prod(k=1, n, 1-q^k );
    nm = sum(n=0, N, (-1)^n* q^(n*(n+1)/2) / ( qn(n) * qn(n+1) ) * (t*q)^(n+1) );
    dn = sum(n=0, N, (-1)^n* q^(n*(n-1)/2) / ( qn(n)^2 ) * (t*q)^n );
    Vec(nm/dn)  \\ Joerg Arndt, Mar 18 2014

Formula

G.f.: 1+A(x) = 1/(1-x/(1-x/(1-x^2/(1-x^2/(1-x^3/(1-x^3/(1-...))))))) (continued fraction). - Paul D. Hanna, May 14 2005
The continued fraction given by P. Flajolet, "Polya Festoons", is derived from a q-expansion, C(x, y;q), where C(1, 1;q) = q/(1-2*q-q^3/(1-2*q^2-q^5/(1-2*q^3-q^7/(1-2*q^4-q^9/(1-...))))) = q + 2*q^2 + 4*q^3 + 9*q^4 + 20*q^5 + 46*q^6 + 105*q^7 + ... - Paul D. Hanna, May 14 2005
G.f.: 1/x/G(0) -1/x, where G(k)= 1 - x^(k+1)/(1 - x^(k+1)/G(k+1) ); (continued fraction). - Sergei N. Gladkovskii, Jun 29 2013
G.f.: W(0)/x - 1/x, where W(k) = 1 - x^(k+1)/( x^(k+1) - 1/(1 - x^(k+1)/( x^(k+1) - 1/W(k+1) ))); R=1 (continued fraction). - Sergei N. Gladkovskii, Aug 27 2013
a(n) ~ c * d^n, where d = A276994 = 2.309138593330494731098720305017212531911814472581628401694402900284456440748..., c = 0.29745350581112195107675842441785013227507248969090226252518932405713367... . - Vaclav Kotesovec, Sep 21 2016
From Peter Bala, Jul 21 2019: (Start)
O.g.f. as a ratio of q-series: 1 + A(q) = N(q)/D(q) = 1 + q + 2*q^2 + 4*q^3 + ..., where N(q) = Sum_{n >= 0} (-1)^n*q^((n^2 + 3*n)/2)/Product_{k = 1..n} (1 - q^k)^2 and D(q) = Sum_{n >= 0} (-1)^n*q^((n^2 + n)/2)/Product_{k = 1..n} (1 - q^k)^2.
The constant d = 2.30913... in the above asymptotic formula is a zero of D(q) (as is 1/d).
Continued fraction representations for the o.g.f.:
1 + A(q) = 1/(1 - q/(1 - q/(1 + q*(1 - q) - q/(1 + q*(1 - q^2) - q/(1 + q*(1 - q^3) - (...) ))))).
1 + A(q) = 1/(1 - q - q^2/(1 - q*(1 + q) - q^4/(1 - q^2*(1 + q) - q^6/(1 - q^3(1 + q) - q^8/( (...) ))))).
1 + A(q) = 1/(1 - q - q^2/(1 - q^2 - q/(1 - q^3 - q^5/(1 - q^4 - q^2/(1 - q^5 - q^8/(1 - q^6 - q^3/(1 - q^7 - q^11/(1 - q^8 - (...) )))))))). (End)

Extensions

More terms from Paul D. Hanna, May 14 2005
Definition modified by Don Knuth, Sep 20 2016

A275761 G.f.: 1/(1 - x/(1+2*x - x^3/(1+2*x^2 - x^5/(1+2*x^3 - x^7/(1+2*x^4 - x^9/(1 - ...)))))), a continued fraction.

Original entry on oeis.org

1, 1, -1, 1, 0, -1, 0, 2, -1, -2, 1, 3, -3, -1, 3, 1, -7, 3, 7, -2, -12, 10, 5, -10, -8, 27, -8, -23, 2, 46, -38, -20, 30, 45, -100, 27, 71, 12, -183, 141, 65, -71, -213, 384, -100, -202, -145, 729, -545, -172, 93, 993, -1497, 430, 452, 962, -2982, 2188, 250, 451, -4527, 6014, -2119, -296, -5456, 12440, -9197, 1206, -5307, 20547, -24963, 11156, -5513, 28712, -53013, 40590, -15529, 36553, -93599, 107065, -60129, 52093, -145383, 231326, -186656, 113800, -214705, 429584, -474454, 323536
Offset: 0

Views

Author

Paul D. Hanna, Aug 08 2016

Keywords

Comments

Row sums of triangle A275760.
Limit a(n)/a(n+1) = -0.83683607462189175014302689979307768909437126147437...

Examples

			G.f.: A(x) = 1 + x - x^2 + x^3 - x^5 + 2*x^7 - x^8 - 2*x^9 + x^10 + 3*x^11 - 3*x^12 - x^13 + 3*x^14 + x^15 - 7*x^16 + 3*x^17 + 7*x^18 - 2*x^19 - 12*x^20 +...
such that
A(x) = 1/(1 - x/(1 + 2*x - x^3/(1 + 2*x^2 - x^5/(1 + 2*x^3 - x^7/(1 + 2*x^4 - x^9/(1 + 2*x^5 - x^11/(1 + 2*x^6 - x^13/(1 - ...)))))))).
RELATED SERIES.
1/A(x) = 1 - x + 2*x^2 - 4*x^3 + 7*x^4 - 12*x^5 + 22*x^6 - 41*x^7 + 74*x^8 - 133*x^9 + 243*x^10 - 444*x^11 + 806*x^12 - 1465*x^13 + 2669*x^14 - 4859*x^15 + 8840*x^16 - 16087*x^17 + 29282*x^18 - 53296*x^19 + 96994*x^20 - 176527*x^21 + 321290*x^22 - 584755*x^23 + 1064251*x^24 +...+ A275762(n)*x^n +...
		

Crossrefs

Programs

  • PARI
    {a(n) = my(A=1 +x*O(x^n)); for(k=0, n, A = 1/A + y*x^(n+1-k)); subst(polcoeff(A, n),y,1)}
    for(n=0,100,print1(a(n),", "))

Formula

G.f.: 1/(1 - x/(1+x + x/(1+x^2 - x^4/(1+x^3 + x^2/(1+x^4 - x^7/(1+x^5 + x^3/(1+x^6 - x^10/(1+x^7 + x^4/(1+x^8 - x^13/(1+x^9 + x^5/(1+x^10 - x^16/(1 + ...)))))))))))), a continued fraction.
G.f.: G(x,1) where G(x,y) = x*y + 1/G(x,x*y) with G(0,y) = 1 (cf. A275760).
G.f.: 1 + x/(1 + x/(1 + x^2/(1 + x^2/(1 + x^3/(1 + x^3/(1 + ...)))))). Cf. A006958 and A227309. - Peter Bala, Oct 29 2017

A275760 G.f. A(x,y) satisfies: A(x,y) = x*y + 1/A(x,x*y), with A(0,y) = 1.

Original entry on oeis.org

1, 0, 1, 0, -1, 0, 1, 0, -1, 1, 0, 1, -2, 0, -1, 2, -1, 0, 1, -2, 3, 0, -1, 3, -4, 1, 0, 1, -4, 5, -4, 0, -1, 4, -8, 7, -1, 0, 1, -4, 11, -10, 5, 0, -1, 5, -13, 16, -11, 1, 0, 1, -6, 16, -24, 18, -6, 0, -1, 6, -20, 33, -30, 16, -1, 0, 1, -6, 24, -44, 49, -30, 7, 0, -1, 7, -28, 57, -74, 53, -22, 1, 0, 1, -8, 32, -74, 105, -92, 47, -8, 0, -1, 8, -37, 94, -145, 149, -89, 29, -1, 0, 1, -8, 43, -114, 200, -226, 163, -70, 9, 0, -1, 9, -48, 138, -268, 332, -281, 143, -37, 1, 0, 1, -10, 53, -168, 346, -480, 454, -276, 100, -10, 0, -1, 10, -60, 200, -442, 675, -704, 503, -221, 46, -1, 0, 1, -10, 67, -234, 561, -922, 1064, -860, 450, -138, 11, 0, -1, 11, -73, 273, -701, 1236, -1567, 1402, -863, 330, -56, 1, 0, 1, -12, 80, -318, 861, -1634, 2246, -2214, 1554, -710, 185, -12, 0, -1, 12, -88, 367, -1047, 2130, -3144, 3403, -2657, 1429, -478, 67, -1, 0, 1, -12, 96, -418, 1268, -2732, 4325, -5088, 4378, -2700, 1088, -242, 13
Offset: 0

Views

Author

Paul D. Hanna, Aug 08 2016

Keywords

Comments

Row sums equals A275761.
Diagonal sums yield A275762.
G.f. A(x,y) evaluated at A(-x,-1) yields the g.f. of A143951.
G.f. A(x,y) evaluated at A(x,1/x) yields the g.f. of A275762.

Examples

			G.f.: A(x,y) = 1 + y*x - y*x^2 + y*x^3 + (y^2 - y)*x^4 + (-2*y^2 + y)*x^5 + (-y^3 + 2*y^2 - y)*x^6 + (3*y^3 - 2*y^2 + y)*x^7 + (y^4 - 4*y^3 + 3*y^2 - y)*x^8 + (-4*y^4 + 5*y^3 - 4*y^2 + y)*x^9 + (-y^5 + 7*y^4 - 8*y^3 + 4*y^2 - y)*x^10 + (5*y^5 - 10*y^4 + 11*y^3 - 4*y^2 + y)*x^11 + (y^6 - 11*y^5 + 16*y^4 - 13*y^3 + 5*y^2 - y)*x^12 + (-6*y^6 + 18*y^5 - 24*y^4 + 16*y^3 - 6*y^2 + y)*x^13 + (-y^7 + 16*y^6 - 30*y^5 + 33*y^4 - 20*y^3 + 6*y^2 - y)*x^14 + (7*y^7 - 30*y^6 + 49*y^5 - 44*y^4 + 24*y^3 - 6*y^2 + y)*x^15 + (y^8 - 22*y^7 + 53*y^6 - 74*y^5 + 57*y^4 - 28*y^3 + 7*y^2 - y)*x^16 +...
such that the g.f. A(x,y) satisfies:
A(x,y) = x*y + 1/(x^2*y + 1/A(x,x^2*y)),
A(x,y) = x*y + 1/(x^2*y + 1/(x^3*y + 1/A(x,x^3*y))),
A(x,y) = x*y + 1/(x^2*y + 1/(x^3*y + 1/(x^4*y + 1/(x^5*y + 1/(x^6*y + 1/A(x^6*y)))))), ...
with the initial condition A(0,y) = 1.
RELATED SERIES.
The g.f. evaluated at A(-x,-1) yields the g.f. of A143951:
A(-x,-1) = 1 + x + x^2 + x^3 + 2*x^4 + 3*x^5 + 4*x^6 + 6*x^7 + 9*x^8 + 14*x^9 + 21*x^10 + 31*x^11 + 47*x^12 +...+ A143951(n)*x^n +...
which enumerates Dyck paths such that the area between the x-axis and the path is n.
The g.f. evaluated at A(x,1/x) yields the g.f. of A275762:
A(x,1/x) = 2 - x + 2*x^2 - 4*x^3 + 7*x^4 - 12*x^5 + 22*x^6 - 41*x^7 + 74*x^8 - 133*x^9 + 243*x^10 - 444*x^11 +...+ A275762(n)*x^n +...
Compare A(x,1/x) to 1/A(x,1), which begins:
1/A(x,1) = 1 - x + 2*x^2 - 4*x^3 + 7*x^4 - 12*x^5 + 22*x^6 - 41*x^7 + 74*x^8 - 133*x^9 + 243*x^10 - 444*x^11 +...+ A275762(n)*x^n +...
This triangle of coefficients in A(x,y) begins:
1;
0, 1;
0, -1;
0, 1;
0, -1, 1;
0, 1, -2;
0, -1, 2, -1;
0, 1, -2, 3;
0, -1, 3, -4, 1;
0, 1, -4, 5, -4;
0, -1, 4, -8, 7, -1;
0, 1, -4, 11, -10, 5;
0, -1, 5, -13, 16, -11, 1;
0, 1, -6, 16, -24, 18, -6;
0, -1, 6, -20, 33, -30, 16, -1;
0, 1, -6, 24, -44, 49, -30, 7;
0, -1, 7, -28, 57, -74, 53, -22, 1;
0, 1, -8, 32, -74, 105, -92, 47, -8;
0, -1, 8, -37, 94, -145, 149, -89, 29, -1;
0, 1, -8, 43, -114, 200, -226, 163, -70, 9;
0, -1, 9, -48, 138, -268, 332, -281, 143, -37, 1;
0, 1, -10, 53, -168, 346, -480, 454, -276, 100, -10;
0, -1, 10, -60, 200, -442, 675, -704, 503, -221, 46, -1;
0, 1, -10, 67, -234, 561, -922, 1064, -860, 450, -138, 11;
0, -1, 11, -73, 273, -701, 1236, -1567, 1402, -863, 330, -56, 1;
0, 1, -12, 80, -318, 861, -1634, 2246, -2214, 1554, -710, 185, -12;
0, -1, 12, -88, 367, -1047, 2130, -3144, 3403, -2657, 1429, -478, 67, -1;
0, 1, -12, 96, -418, 1268, -2732, 4325, -5088, 4378, -2700, 1088, -242, 13;
0, -1, 13, -104, 474, -1521, 3459, -5863, 7416, -7002, 4830, -2295, 674, -79, 1;
0, 1, -14, 112, -538, 1803, -4342, 7819, -10598, 10884, -8290, 4537, -1624, 310, -14;
0, -1, 14, -121, 607, -2124, 5397, -10274, 14895, -16478, 13769, -8473, 3588, -928, 92, -1;
0, 1, -14, 131, -678, 2492, -6638, 13348, -20582, 24408, -22200, 15126, -7406, 2367, -390, 15;
0, -1, 15, -140, 755, -2905, 8095, -17160, 27998, -35485, 34829, -26052, 14411, -5476, 1251, -106, 1; ...
		

Crossrefs

Programs

  • PARI
    /* Print first N rows of this triangle: */ N=32;
    {a(n) = my(A=1 +x*O(x^n)); for(k=0, n, A = 1/A + y*x^(n+1-k)); polcoeff(A, n)}
    {for(n=0, N, for(k=0, n, if(k==0, print1(polcoeff(a(n)+y*O(y^n), k, y)", "), if(polcoeff(a(n)+y*O(y^n), k, y)==0, break, print1(polcoeff(a(n)+y*O(y^n), k, y), ", ")))); print(""))}

Formula

G.f.: A(x,y) = 1/(1 - x*y/(1 + x*(1+y) - x^3*y/(1 + x^2*(1+y) - x^5*y/(1 + x^3*(1+y) - x^7*y/(1 + x^4*(1+y) - x^9*y/(1 - ...)))))), a continued fraction.
G.f.: A(x,y) = 1/(1 - x*y/(1+x + x*y/(1+x^2 - x^4*y/(1+x^3 + x^2*y/(1+x^4 - x^7*y/(1+x^5 + x^3*y/(1+x^6 - x^10*y/(1+x^7 + x^4*y/(1+x^8 - x^13*y/(1+x^9 + x^5*y/(1+x^10 - x^16*y/(1 + ...)))))))))))), a continued fraction.
Given g.f. A(x,y), then A(x,1/x) = 1 + 1/A(x,1).

A291940 Triangle read by rows: T(n,k) = T(n-k,k-1) - 2*T(n-k,k) + T(n-k,k+1) with T(0,0) = 1 for 0 <= k <= A003056(n).

Original entry on oeis.org

1, 0, 1, 0, -2, 0, 4, 1, 0, -7, -2, 0, 12, 2, 0, -22, -3, 1, 0, 41, 8, -2, 0, -74, -15, 2, 0, 133, 23, -5, 0, -243, -42, 12, 1, 0, 444, 82, -19, -2, 0, -806, -147, 33, 2, 0, 1465, 261, -65, -5, 0, -2669, -479, 118, 10, 0, 4859, 878, -211, -15, 1, 0, -8840, -1593, 386
Offset: 0

Views

Author

Seiichi Manyama, Sep 06 2017

Keywords

Examples

			First few rows are:
  1;
  0,    1;
  0,   -2;
  0,    4,   1;
  0,   -7,  -2;
  0,   12,   2;
  0,  -22,  -3,  1;
  0,   41,   8, -2;
  0,  -74, -15,  2;
  0,  133,  23, -5;
  0, -243, -42, 12, 1.
		

Crossrefs

Row sums give A291942.
Columns 0-1 give A000007, (-1)*A275762 (for n>0).
Showing 1-4 of 4 results.