|
| |
|
|
A096734
|
|
a(n)=det(M_n) where M_n is the n X n matrix m(i,j)=1 if sigma(i+j) is even, 0 otherwise.
|
|
0
| |
|
|
0, -1, -1, 2, 0, -2, -9, 9, -13, -40, 52, 16, 3, 3, -25, 150, 73, -119, 435, -409, -1479, -1526, 2783, -1065, -7623, -6534, -2961, 10905, -7625, -49205, 114044, -160163, -364571, 849751, 6638244, 936704, -19925924, 29919679, 44801693, 15691398, -78571565, 78004083, 152659515, -328585072
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,4
|
|
|
PROG
| (PARI) for(n=1, 70, print1(matdet(matrix(n, n, i, j, if((-1)^(sigma(i+j))+1, 1, 0))), ", "))
|
|
|
CROSSREFS
| Sequence in context: A004514 A137302 A091518 * A038020 A107094 A122496
Adjacent sequences: A096731 A096732 A096733 * A096735 A096736 A096737
|
|
|
KEYWORD
| easy,sign
|
|
|
AUTHOR
| Benoit Cloitre (benoit7848c(AT)orange.fr), May 30 2002
|
| |
|
|
