|
|
A368141
|
|
Number of ways of tiling the n X n torus up to diagonal and antidiagonal reflections of the square by a tile that is fixed under only 180-degree rotations.
|
|
5
|
|
|
1, 4, 24, 1154, 337600, 477339020, 2872202028544, 72057595967315028, 7462505059899321934848, 3169126500571074529202043808, 5492677668532710795071525279789056, 38716571525226776289479030777837491607904, 1106936151351216411420552029913564174524281470976
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
A368141[n_] := 1/(4 n^2) (DivisorSum[n, Function[d, DivisorSum[n, Function[c, EulerPhi[c] EulerPhi[d] 2^(n^2/LCM[c, d])]]]] + n^2*If[EvenQ[n], (7*2^((n^2 - 4)/2)), 2^((n^2 + 1)/2)] + 2*n*DivisorSum[n, Function[d, EulerPhi[d]*If[EvenQ[d], 2^(n^2/(2 d)), 0]]])
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|