|
%I #12 Jul 15 2023 12:42:43
%S 1,8,100,1208,14554,175352,2112772,25456328,306717703,3695574048,
%T 44527157584,536497912672,6464145163032,77885061063584,
%U 938419943222768,11306815168562400,136233325153964242,1641445323534504928,19777413104380161776,238293693669343744032
%N Number of 8-compositions of n: matrices with 8 rows of nonnegative integers with positive column sums and total element sum n.
%C Also the number of compositions of n where each part i is marked with a word of length i over an octonary alphabet whose letters appear in alphabetical order.
%H Alois P. Heinz, <a href="/A261800/b261800.txt">Table of n, a(n) for n = 0..925</a>
%H <a href="/index/Rec#order_08">Index entries for linear recurrences with constant coefficients</a>, signature (16,-56,112,-140,112,-56,16,-2).
%F G.f.: (1-x)^8/(2*(1-x)^8-1).
%F a(n) = A261780(n,8).
%p a:= proc(n) option remember; `if`(n=0, 1,
%p add(a(n-j)*binomial(j+7, 7), j=1..n))
%p end:
%p seq(a(n), n=0..20);
%t CoefficientList[Series[(1-x)^8/(2(1-x)^8-1),{x,0,30}],x] (* or *) LinearRecurrence[{16,-56,112,-140,112,-56,16,-2},{1,8,100,1208,14554,175352,2112772,25456328,306717703},30] (* _Harvey P. Dale_, Jul 15 2023 *)
%Y Column k=8 of A261780.
%K nonn,easy
%O 0,2
%A _Alois P. Heinz_, Sep 01 2015
|
