OFFSET
8,2
COMMENTS
Also number of self-inverse permutations in S_n with longest increasing subsequence of length >= 8. a(8)=1: 12345678; a(9)=9: 123456789, 123456798, 123456879, 123457689, 123465789, 123546789, 124356789, 132456789, 213456789.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 8..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<4, [1, 1, 2, 4][n+1],
((4*n^3+78*n^2+424*n+495)*g(n-1) +(n-1)*(34*n^2+280*n
+305)*g(n-2) -2*(n-1)*(n-2)*(38*n+145)*g(n-3) -105*(n-1)
*(n-2)*(n-3)*g(n-4)) / ((n+6)*(n+10)*(n+12)))
end:
a:= n-> b(n) -g(n):
seq(a(n), n=8..30);
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Oct 24 2012
STATUS
approved