OFFSET
1,2
COMMENTS
Euler transform of length 3 sequence [2,k,-1] with k=4 (cf. A028724 for k=3). - Georg Fischer, Nov 28 2020
FORMULA
a(1) = b(1), a(2) = b(2), a(n) = b(n) + b(n-1) + b(n-2) for n > 2, where k = 4 and b(n) = binomial(floor((n+7)/2), k) = A189976(n-7).
EXAMPLE
b(n) = 1, 1, 5, 5, 15, 15, 35, 35, 70, 70,126,126
+ 0, 1, 1, 5, 5, 15, 15, 35, 35, 70, 70,126
+ 0, 0, 1, 1, 5, 5, 15, 15, 35, 35, 70, 70
-----------------------------------------------
a(n) = 1, 2, 7, 11, 25, 35, 65, 85,140,175,266,322
MATHEMATICA
k := 4; nmax := 32; a := Flatten[Table[{Binomial[n, k], Binomial[n, k]}, {n, k, nmax}]];
a + Flatten[Join[{0}, Drop[a, -1]]] + Flatten[Join[{0, 0}, Drop[a, -2]]] (* Georg Fischer, Nov 29 2020 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Alford Arnold, May 08 2004
EXTENSIONS
More terms from and edited by Georg Fischer, Nov 28 2020
STATUS
approved