cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A344491 a(n) = 1 + Sum_{k=0..n-4} binomial(n-3,k) * a(k).

This page as a plain text file.
%I A344491 #5 May 21 2021 08:07:08
%S A344491 1,1,1,1,2,4,8,16,37,97,275,810,2468,7840,26182,92047,339029,1299185,
%T A344491 5152244,21091816,89087652,388318264,1746324563,8094422821,
%U A344491 38608318847,189179752492,950930369320,4898477508796,25841317224002,139534769647745,770795537345237,4353368099507329
%N A344491 a(n) = 1 + Sum_{k=0..n-4} binomial(n-3,k) * a(k).
%F A344491 G.f. A(x) satisfies: A(x) = (1 + x^3 * A(x/(1 - x))) / ((1 - x) * (1 + x^3)).
%t A344491 a[n_] := a[n] = 1 + Sum[Binomial[n - 3, k] a[k] , {k, 0, n - 4}]; Table[a[n], {n, 0, 31}]
%t A344491 nmax = 31; A[_] = 0; Do[A[x_] = (1 + x^3 A[x/(1 - x)])/((1 - x) (1 + x^3)) + O[x]^(nmax + 1) // Normal, nmax + 1]; CoefficientList[A[x], x]
%Y A344491 Cf. A000629, A210541, A344489, A344490, A344492, A344493.
%K A344491 nonn
%O A344491 0,5
%A A344491 _Ilya Gutkovskiy_, May 21 2021