login
A243483
Number of isoscent sequences of length n with exactly ten descents.
2
337, 160209, 23441160, 1838225077, 96489145747, 3811395804513, 121601176737897, 3282923948925446, 77478734844431881, 1636893656189797572, 31518723465396312391, 560886706260989476771, 9326899340333117160667, 146227744471477090965955, 2177361235069807245253904
OFFSET
17,1
LINKS
Joerg Arndt and Alois P. Heinz, Table of n, a(n) for n = 17..100
MATHEMATICA
b[n_, i_, t_] := b[n, i, t] = If[n < 1, 1, Expand[Sum[ If[j < i, x, 1] *b[n - 1, j, t + If[j == i, 1, 0]], {j, 0, t + 1}]]]; a[n_] := Coefficient[b[n - 1, 0, 0], x, 10]; Table[a[n], {n, 17, 40}] (* Jean-François Alcover, Feb 09 2015, after A242352 *)
CROSSREFS
Column k=10 of A242352.
Sequence in context: A184202 A194478 A084231 * A234625 A226539 A066478
KEYWORD
nonn
AUTHOR
Joerg Arndt and Alois P. Heinz, Jun 05 2014
STATUS
approved