|
|
A071083
|
|
Determinant of the n X n matrix whose element (i,j) equals phi(|i-j|).
|
|
6
|
|
|
0, -1, 2, -4, 6, -5, -84, 245, 924, -8816, -78556, -58667, 6779732, 10484275, -363899598, -6434306752, -13046891490, 20608641823, 1894093427008, -6177545952015, 18227184915788, -46023445768832, -8765268354146700, -1210879926442292743, -149657142827643535248
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
MATHEMATICA
|
f[n_] := Det[ Table[ EulerPhi[ Abs[i - j]], {i, 1, n}, {j, 1, n}]]; Table[ f[n], {n, 1, 22}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,changed
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|