A361758 - OEIS

A361758

a(n) = [x^n] (x^5 + 5*x^4 + 4*x^3 - 3*x + 1)/((1 - x)*(x^2 + 2*x - 1)^2).

1, 2, 4, 10, 30, 90, 264, 754, 2106, 5778, 15628, 41786, 110678, 290858, 759312, 1971042, 5091442, 13095586, 33555988, 85695978, 218198158, 554081146, 1403588376, 3547702610, 8949110954, 22532603954, 56637795100, 142141826074, 356212187334, 891481312842

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,2

LINKS

Table of n, a(n) for n=0..29.

FORMULA

a(n) = ((3*n^2 - 7*n + 2)*a(n - 1) - (n^2 - n)*a(n - 3) - (n^2 - 3*n)*a(n - 2)) / ((n - 1)*(n - 2)) for n >= 4.

MAPLE

a := proc(n) option remember; if n < 4 then return [1, 2, 4, 10][n + 1] fi;

((3*n^2 - 7*n + 2)*a(n - 1) - (n^2 - n)*a(n - 3) - (n^2 - 3*n)*a(n - 2))/((n - 1)*(n - 2)) end: seq(a(n), n = 0..29);

# Alternative:

ogf := (x^5 + 5*x^4 + 4*x^3 - 3*x + 1)/((1 - x)*(x^2 + 2*x - 1)^2):