A174890 a(n) = det(M) where M is an n X n matrix with M[i,j] = i^j - j^i.

1, 0, 1, 0, 196, 0, 65028096, 0, 1540115470208876544, 0, 861787404007697994335390269440000, 0, 3024149801599872168810739614376506649075557335040000, 0, 25610879735369429335666530857036523659955793212506655095941286757767577600000000

Offset: 0

Author

José María Grau Ribas, Apr 01 2010

Keywords

• nonn

Crossrefs

Cf. A071410.

Programs

Mathematica

f[n_] := Table[i^j - j^i, {i, 1, n}, {j, 1, n}]; Table[Det[f[n]], {n, 1, 15}]

Formula

a(2n) = A071410(n), a(2n+1) = 0. - Alois P. Heinz, Jan 25 2023

Extensions

a(0)=1 prepended by Alois P. Heinz, Jan 25 2023