OFFSET
0,4
COMMENTS
A succession of a permutation p is the appearance of [k,k+1], e.g. in 23541, 23 is a succession.
EXAMPLE
a(4) = 12 because we have 1324, 1432, 2341, 2431, 3214, 3241, 3412, 3421, 4123, 4132, 4213 and 4312.
PROG
(PARI) A207821(n)=my(p, c); sum(k=1, n!, p=numtoperm(n, k); c=(p[1]==1); for(j=2, n, p[j]==j & c<=0 & !c++ & break; p[j]-1==p[j-1] & c>=0 & !c-- & break); c!=0) \\ - M. F. Hasler, Jan 13 2013
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Jon Perry, Jan 10 2013
EXTENSIONS
Values a(1) to a(10) double-checked by M. F. Hasler, Jan 13 2013
Inserted a(0) and a(11)-a(13) from Alois P. Heinz, Jan 18 2013
a(14)-a(20) from Alois P. Heinz, Jul 05 2021
STATUS
approved