|
%I #9 Feb 21 2019 20:43:43
%S 0,1,3,12,53,282,1753,12566,102233,931746,9408941,104310042,
%T 1259745925,16464164978,231539899697,3486551697582,55972130401073,
%U 954322312212546,17222351842894933,327979242711784226,6573122342554664381,138292026914011788882
%N Row sums of A306234.
%H Alois P. Heinz, <a href="/A306525/b306525.txt">Table of n, a(n) for n = 0..450</a>
%p a:= proc(n) option remember; `if`(n<5, [0, 1, 3, 12, 53][n+1],
%p (2*(2*n^2-9*n+6)*a(n-1) -(2*n^3-13*n^2+21*n-8)*a(n-2)
%p -(4*n^2-21*n+30)*a(n-3) +(2*n^3-19*n^2+63*n-71)*a(n-4)
%p -(2*n-5)*(n-4)*a(n-5)) / (2*n-7))
%p end:
%p seq(a(n), n=0..23);
%Y Row sums of A306234.
%K nonn
%O 0,3
%A _Alois P. Heinz_, Feb 21 2019
|
