OFFSET
1,1
LINKS
S. N. Ethier and Jiyeon Lee, Counting toroidal binary arrays, II, arXiv:1502.03792v1 [math.CO], Feb 12, 2015 and J. Int. Seq. 18 (2015).
Peter Kagey, Illustration of a(3)=28
Peter Kagey and William Keehn, Counting tilings of the n X m grid, cylinder, and torus, arXiv: 2311.13072 [math.CO], 2023. See also J. Int. Seq., (2024) Vol. 27, Art. No. 24.6.1, pp. A-21, A-24.
MATHEMATICA
A368143[n_] := 1/(4n^2)*(DivisorSum[n, Function[d, DivisorSum[n, Function[c, EulerPhi[c] EulerPhi[d] 2^(n^2/LCM[c, d])]]]] + n^2*If[OddQ[n], 2^((n^2 + 1)/2) + 2^((n^2 + 7)/4), 7*2^((n^2 - 4)/2) + 5*2^(n^2/4)])
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Kagey, Dec 16 2023
STATUS
approved