OFFSET
6,2
COMMENTS
Also number of self-inverse permutations in S_n with longest increasing subsequence of length >= 6. a(6)=1: 123456; a(7)=7: 1234567, 1234576, 1234657, 1235467, 1243567, 1324567, 2134567.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 6..300
Wikipedia, Involution (mathematics)
Wikipedia, Young tableau
MAPLE
b:= proc(n) b(n):= `if`(n<2, 1, b(n-1) +(n-1)*b(n-2)) end:
g:= proc(n) option remember; `if`(n<3, [1, 1, 2][n+1],
((3*n^2+17*n+15)*g(n-1) +(n-1)*(13*n+9)*g(n-2)
-15*(n-1)*(n-2)*g(n-3)) / ((n+4)*(n+6)))
end:
a:= n-> b(n) -g(n):
seq(a(n), n=6..30);
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Oct 24 2012
STATUS
approved