OFFSET
0,4
FORMULA
EXAMPLE
a(3)=4 because we have 132, 312, 213 and 231 (123 and 321 do not qualify).
MAPLE
g[0] := 1: g[1] := 0: for n from 2 to 20 do g[n] := (2*(n-1))*(g[n-1]+g[n-2]) end do: a := proc (n) if `mod`(n, 2) = 1 then factorial((1/2)*n-1/2)*2^((1/2)*n-1/2)*g[(1/2)*n+1/2] else factorial((1/2)*n)*2^((1/2)*n)*g[(1/2)*n] end if end proc: seq(a(n), n = 0 .. 24);
CROSSREFS
KEYWORD
nonn
AUTHOR
Emeric Deutsch, Jan 26 2009
STATUS
approved