|
|
A119508
|
|
Determinant of n X n matrix of first n^2 terms of Euler totient function phi (A000010).
|
|
1
|
|
|
1, 0, -16, 80, -4640, -1696, -47290368, 778240, -1252408320, 827269120, -1883587535170560, -167527809024, -660985839681085440, -66300178824585216, -1744375183677849600, 29157688117836220727296, 5544673967679230591621398528, -134078707495836661579776
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
EXAMPLE
|
a(2) = 0 because of the singular matrix 0 =
|1 1|
|2 2|.
|
|
MATHEMATICA
|
nmax = 20; Table[Det[Table[EulerPhi[k*(i-1) + j], {i, 1, k}, {j, 1, k}]], {k, 1, nmax}] (* Vaclav Kotesovec, Feb 24 2019 *)
Table[Det[Partition[EulerPhi[Range[n^2]], n]], {n, 20}] (* Harvey P. Dale, Jul 28 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,sign
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|