A318267 a(n) is the number of configurations of n indistinguishable pairs placed on the vertices of the ladder graph P_2 X P_n such that all but two such pairs are joined by an edge.

0, 0, 1, 8, 39, 138, 414, 1104, 2715, 6282, 13875, 29540, 61060, 123192, 243589, 473540, 907335, 1716974, 3214066, 5959704, 10958687, 20001526, 36264579, 65359752, 117165096, 209008464, 371190217, 656540768, 1156924167, 2031676818, 3556517478

Offset

0,4

Comments

The generating function has been obtained using the calculus of the rook polynomial associated with A046741.

The case of all but one pair joined by an edge is given by A178523(n-1). The case of all pairs joined by an edge is given by A000045(n+1), i.e., the number of perfect matchings in the ladder graph.

This is also the number of "(n-2)-domino" configurations in the game of memory played on a 2 X n rectangular array, see [Young]. - Donovan Young, Oct 23 2018

Links

Muniru A Asiru, Table of n, a(n) for n = 0..2000

D. Young, The Number of Domino Matchings in the Game of Memory, Journal of Integer Sequences, Vol. 21 (2018), Article 18.8.1.

Donovan Young, Generating Functions for Domino Matchings in the 2 * k Game of Memory, arXiv:1905.13165 [math.CO], 2019. Also in J. Int. Seq., Vol. 22 (2019), Article 19.8.7.

Index entries for linear recurrences with constant coefficients, signature (5,-7,-2,10,-2,-5,1,1).

Formula

G.f.: x^2*(1 + 3*x + 6*x^2 + x^3 + 3*x^4)/((1 - x)^2*(1 - x - x^2)^3).

Example

Consider the case n=3. Let the 2 X 3 grid have vertex set {O(0, 0), A(1, 0), B(2, 0), C(2, 1), D(1, 1), E(0, 1)} and edge set {OA, AB, ED, DC, OE, AD, BC}.
If DC represents the one pair which is joined by an edge, the remaining pairs must be placed on AE and OB; there are three other such configurations where the joined pair is placed instead on ED, OA, or AB. Our count is now at 4. If the joined pair is placed on OE then the remaining pairs must be placed on BD and AC; there is one other such configuration where the joined pair is placed on BC, bringing the count to 6. Finally, let the joined pair be placed on AD, then the remaining pairs may be placed either on OB, EC or on OC, EB, and thus we have a(3) = 8.

Maple

seq(coeff(series(x^2*(1+3*x+6*x^2+x^3+3*x^4)/((1-x)^2*(1-x-x^2)^3), x, n+1), x, n), n = 0 .. 30); # Muniru A Asiru, Oct 23 2018

Mathematica

CoefficientList[Normal[Series[x^2(1 + 3*x + 6*x^2 + x^3 + 3*x^4)/(1 - x)^2/(1 - x - x^2)^3, {x, 0, 30}]], x]

Prog

(GAP) a:=[0, 0, 1, 8, 39, 138, 414, 1104];;  for n in [9..35] do a[n]:=5*a[n-1]-7*a[n-2]-2*a[n-3]+10*a[n-4]-2*a[n-5]-5*a[n-6]+a[n-7]+a[n-8]; od; a; # Muniru A Asiru, Oct 23 2018

Crossrefs

Cf. A000045, A046741, A178523, A318243, A318244, A318268, A318269, A318270.

Sequence in context: A101374 A163687 A060446 * A063002 A055581 A297017

Adjacent sequences: A318264 A318265 A318266 * A318268 A318269 A318270

Keyword

nonn,easy

Author

Donovan Young, Aug 22 2018

Status

approved