login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A228999 Total sum of the 9th powers of lengths of ascending runs in all permutations of [n]. 3
0, 1, 514, 21738, 391026, 4924020, 53791050, 568417200, 6145964610, 69860663220, 844435826250, 10893660591480, 149983769015490, 2200169585018220, 34307707031519370, 567195605817520080, 9916409711089798530, 182880725414279970660, 3549284743350503607690 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

COMMENTS

Generally, A(n,k) ~ n! * n * sum(t>=1, t^k*(t^2+t-1)/(t+2)!) = n! * n * ((Bell(k) - Bell(k+1) + sum(j=0..k, (-1)^j*(2^j*((2*k-j+1)/(j+1))-1) *Bell(k-j)*C(k,j)))*exp(1) - (-1)^k*(2^k-1)), where Bell(k) are Bell numbers A000110. Set k=9 for this sequence. - Vaclav Kotesovec, Sep 12 2013

LINKS

Alois P. Heinz, Table of n, a(n) for n = 0..200

FORMULA

a(n) ~ n! * (14604*exp(1)+511)*n. - Vaclav Kotesovec, Sep 12 2013

MAPLE

a:= proc(n) option remember; `if`(n<4, [0, 1, 514, 21738][n+1],

      ((462*n^4-1028*n^3+4428*n^2-18152*n+75890)*a(n-1)

      -(231*n^5-745*n^4+9964*n^3-46367*n^2+184023*n-145440)*a(n-2)

      +2*(n-2)*(2258*n^3-10187*n^2+41200*n-31605)*a(n-3)

      +(n-2)*(n-3)*(231*n^3-2258*n^2+6701*n-6340)*a(n-4))/

      (231*n^3-514*n^2-275*n+880))

    end:

seq(a(n), n=0..30);

MATHEMATICA

k=9; Table[n^k+Sum[t^k*n!*(n*(t^2+t-1)-t*(t^2-4)+1)/(t+2)!+Floor[t/n]*(1/(t*(t+3)+2)), {t, 1, n-1}], {n, 0, 20}] (* Vaclav Kotesovec, Sep 12 2013 *)

CROSSREFS

Column k=9 of A229001.

Sequence in context: A253637 A231415 A271760 * A168126 A246244 A257087

Adjacent sequences:  A228996 A228997 A228998 * A229000 A229001 A229002

KEYWORD

nonn

AUTHOR

Alois P. Heinz, Sep 10 2013

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 29 00:44 EDT 2022. Contains 357081 sequences. (Running on oeis4.)