OFFSET
1,2
REFERENCES
Jerry Glynn and Theodore Gray, The Beginner's Guide to Mathematica Version 4, Cambridge University Press, 2000, p. 76.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..76
FORMULA
a(n) = (1-n^2)^(n-1).
EXAMPLE
a(4) = determinant(M_4) = -3375 where M_4 is the matrix
[ 1 4 16 64]
[ 4 1 4 16]
[16 4 1 4]
[64 16 4 1]
MAPLE
for n from 1 to 20 do: x:=(1-n^2)^(n-1):print(x):od:
PROG
(Magma) [ Determinant( SymmetricMatrix( &cat[ [ n^Abs(j-k): k in [1..j] ]: j in [1..n] ] ) ): n in [1..13] ]; // Klaus Brockhaus, Apr 16 2010
CROSSREFS
KEYWORD
sign
AUTHOR
Michel Lagneau, Mar 30 2010
EXTENSIONS
Edited by Klaus Brockhaus, Apr 16 2010
STATUS
approved