OFFSET
0,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..740
M. Bernstein and N. J. A. Sloane, Some canonical sequences of integers, arXiv:math/0205301 [math.CO], 2002; Linear Alg. Applications, 226-228 (1995), 57-72; erratum 320 (2000), 210. [Link to arXiv version]
M. Bernstein and N. J. A. Sloane, Some canonical sequences of integers, Linear Alg. Applications, 226-228 (1995), 57-72; erratum 320 (2000), 210. [Link to Lin. Alg. Applic. version together with omitted figures]
N. J. A. Sloane, Transforms
FORMULA
G.f. A(x) satisfies: A(x) = 1 + 2*x + 4*x^2 + 8*x^3 + x^4*A(x/(1 + x))/(1 + x). - Ilya Gutkovskiy, Feb 02 2022
MAPLE
a:= proc(n) option remember; (m-> `if`(m<0, 2^n,
add(a(m-j)*binomial(m, j)*(-1)^j, j=0..m)))(n-4)
end:
seq(a(n), n=0..35); # Alois P. Heinz, Feb 02 2022
MATHEMATICA
a[n_] := a[n] = Function[m, If[m < 0, 2^n, Sum[a[m - j]* Binomial[m, j]*(-1)^j, {j, 0, m}]]][n - 4];
Table[a[n], {n, 0, 35}] (* Jean-François Alcover, Mar 08 2023, after Alois P. Heinz *)
CROSSREFS
KEYWORD
sign
AUTHOR
STATUS
approved