login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A184287
Number of distinct n X 4 toroidal 0..4 arrays.
2
165, 49075, 20346485, 9536816875, 4768372070757, 2483526896194175, 1330460821097243445, 727595761432647851875, 404219867454740749892485, 227373675443239212037148635, 129189588320018269798974609525, 74014868308343773086872161914375
OFFSET
1,1
LINKS
MATHEMATICA
T[n_, k_] := (1/(n*k))*Sum[Sum[EulerPhi[c]*EulerPhi[d]*5^(n*k/LCM[c, d]), {d, Divisors[k]}], {c, Divisors[n]}]; a[n_] := T[n, 4]; Array[a, 12] (* Jean-François Alcover, Nov 01 2017, after Andrew Howroyd *)
PROG
(PARI) a(n) = my(k=4); (1/(n*k)) * sumdiv(n, c, sumdiv(k, d, eulerphi(c) * eulerphi(d) * 5^(n*k/lcm(c, d)))); \\ Michel Marcus, Nov 01 2017
CROSSREFS
Column 4 of A184288.
Sequence in context: A273441 A046178 A176018 * A233466 A203183 A184128
KEYWORD
nonn
AUTHOR
R. H. Hardin, Jan 10 2011
EXTENSIONS
Terms a(6) and beyond from Andrew Howroyd, Sep 27 2017
STATUS
approved