OFFSET
1,2
COMMENTS
Negative terms for n: 2, 4, 7, 9, 10, 13, 14, 15, 17, 18, 23, 24, 27, 28, 30, ..., .
MATHEMATICA
f[n_] := 1/Det[ Table[ 1/GCD[i, j], {i, n}, {j, n}]]; Numerator@ Array[f, 27]
PROG
(PARI) vector(40, n, numerator(1/matdet(matrix(n, n, i, j, 1/gcd(i, j))))) \\ Michel Marcus, Aug 06 2015
CROSSREFS
KEYWORD
sign
AUTHOR
Robert G. Wilson v, Aug 04 2015
STATUS
approved