OFFSET
1,3
COMMENTS
Same as A147681.
EXAMPLE
For n = 3, the 3 permutations are (2,3,1), (3,1,2) and (3,2,1).
PROG
(PARI) a(n) = {nbok = 0; avg = (n+1)/2; for (j = 1, n!, perm = numtoperm(n, j); ok = 1; for (k = 1, n, if (sum(j=1, k, perm[j])/k < avg, ok = 0; break; ); ); if (ok, nbok++); ); nbok; } \\ Michel Marcus, Aug 12 2013
CROSSREFS
KEYWORD
nonn,more
AUTHOR
N. Sato, Oct 22 2008
EXTENSIONS
a(7)-a(11) from Michel Marcus, Aug 12 2013
STATUS
approved