OFFSET
0,3
COMMENTS
Basically, for n = 1, 2, ..., 513, the terms a(n) are calculated by the double product formula in the program below, with the help of the authors' C# program using the BigInteger and BigFloat classes. (The computer calculations took 44 hours to complete.)
Alternatively, the value of a(513) is calculated by the homogeneous linear recurrence relation of order 256; the thus calculated value coincides with the one obtained by the classical double product formula. Furthermore, using the recurrence relation, the values of a(514), a(515), ..., a(10240) are also calculated. (The computer calculations took 4 minutes to complete.)
REFERENCES
A. M. Magomedov, T. A. Magomedov, S. A. Lawrencenko, Mutually-recursive formulas for enumerating partitions of the rectangle (Russian, English summary), Prikl. Diskr. Mat., 46 (2019), 108-121.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..514
M. E. Fisher, Statistical mechanics of dimers on a plane lattice, Phys. Rev. 124 (1961) 1664-1672.
P. W. Kasteleyn, The statistics of dimers on a lattice, Physica 27 (1961), 1209-1225.
P. W. Kasteleyn, Dimer statistics and phase transitions, J. Math. Phys., 4 (1963), 287-293.
Viet-Ha Nguyen, Kévin Perrot, Mathieu Vallet, NP-completeness of the game Kingdomino(TM), Theoretical Computer Science (2020) Vol. 822, 23-35. See also arXiv:1909.02849, [cs.CC], 2019.
FORMULA
The sequence is completely defined by the following formula, which is a special case of a classical double product formula (A099390): a(n) = Product_{j=1..8} (Product_{k=1..floor(n/2)} (4*(cos(j*Pi/17))^2 + 4*(cos(k*Pi/(n+1)))^2)). In addition, a homogeneous linear recurrence relation of order 256 with constant coefficients is obtained to generate the sequence.
EXAMPLE
a(1) = 1, since there is only one domino tiling of the 16 X n rectangle, which consists entirely of horizontal tiles.
a(2) = 1597 = F(17), since the number of domino tilings of the m X 2 rectangle is the Fibonacci number F(m+1).
Note that the terms a(16) and a(33) are even. More generally, for m even, the numbers of domino tilings of the m X m square and of the m X (2m+1) rectangle are even.
MAPLE
b:= proc(n, l) option remember; local k;
if n=0 then 1
elif min(l)>0 then (t-> b(n-t, map(h->h-t, l)))(min(l))
else for k while l[k]>0 do od; `if`(n>1, b(n, subsop(k=2, l)), 0)+
`if`(k<nops(l) and l[k+1]=0, b(n, subsop(k=1, k+1=1, l)), 0)
fi
end:
a:= n-> b(n, [0$16]):
seq(a(n), n=0..15); # Alois P. Heinz, Jan 12 2021
MATHEMATICA
Do[
P = 1; m = 16;
Do[
P = N[P*(4*Cos[Pi*i/(n + 1)]^2 + 4*Cos[Pi*j/(m + 1)]^2), 1020],
{i, 1, n/2}, {j, 1, m/2}];
Print["P=", N[P, 1020], " n=", n, " m=", m],
{n, 1, 20}
]
CROSSREFS
KEYWORD
nonn
AUTHOR
A. M. Magomedov and Serge Lawrencenko, Jan 10 2021
STATUS
approved