A229152 a(n) = n^9*(11*n+9)/2.

0, 10, 7936, 413343, 6946816, 62500000, 377913600, 1735205101, 6509559808, 20920706406, 59500000000, 153266599915, 363764514816, 805941952348, 1683875312896, 3344572265625, 6356551598080, 11621611896706, 20530186553088, 35172959057911, 58624000000000

Offset

0,2

Comments

Number of ascending runs in {1,...,n}^10.

Links

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

Index entries for linear recurrences with constant coefficients, signature (11,-55,165,-330,462,-462,330,-165,55,-11,1).

Formula

G.f.: -(x^9 +3317*x^8 +199643*x^7 +2172239*x^6 +6901145*x^5 +7512749*x^4 +2834873*x^3 +326597*x^2 +7826*x +10)*x / (x-1)^11.

a(n) = 11*a(n-1) - 55*a(n-2) + 165*a(n-3) - 330*a(n-4) + 462*a(n-5) - 462*a(n-6) + 330*a(n-7) - 165*a(n-8) + 55*a(n-9) - 11*a(n-10) + a(n-11). - Wesley Ivan Hurt, Feb 08 2026

Maple

a:= n-> n^9*(11*n+9)/2:
seq(a(n), n=0..40);

Mathematica

A229152[n_]:=n^9(11n+9)/2; Array[A229152, 30, 0] (* Paolo Xausa, Oct 23 2023 *)
LinearRecurrence[{11, -55, 165, -330, 462, -462, 330, -165, 55, -11, 1}, {0, 10, 7936, 413343, 6946816, 62500000, 377913600, 1735205101, 6509559808, 20920706406, 59500000000}, 30] (* Harvey P. Dale, May 21 2026 *)

Prog

(Magma) [n^9*(11*n+9)/2 : n in [0..30]]; // Wesley Ivan Hurt, Feb 08 2026

Crossrefs

Row n=10 of A229079.

Sequence in context: A304437 A358920 A108089 * A125543 A291562 A203589

Adjacent sequences: A229149 A229150 A229151 * A229153 A229154 A229155

Keyword

nonn,easy

Author

Alois P. Heinz, Sep 15 2013

Status

approved