|
|
A113127
|
|
Expansion of (1 + x + x^2 + x^3)/(1-x)^2.
|
|
8
|
|
|
1, 3, 6, 10, 14, 18, 22, 26, 30, 34, 38, 42, 46, 50, 54, 58, 62, 66, 70, 74, 78, 82, 86, 90, 94, 98, 102, 106, 110, 114, 118, 122, 126, 130, 134, 138, 142, 146, 150, 154, 158, 162, 166, 170, 174, 178, 182, 186, 190, 194, 198, 202, 206, 210, 214, 218, 222, 226, 230
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Row sums of number triangle A113126.
Equals binomial transform of [1, 2, 1, 0, -1, 2, -3, 4, -5, ...]. - Gary W. Adamson, Feb 14 2009
The size of a maximal 4-degenerate graph of order n-2 (this class includes 4-trees). - Allan Bickle, Nov 14 2021
Maximum size of an apex graph of order n-2 (an apex graph can be made planar by deleting a single vertex). - Allan Bickle, Nov 14 2021
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 4*n - 2 + 2*binomial(0, n) + binomial(1, n);
a(n) = binomial(n+1, n) + binomial(n, n-1) + binomial(n-1, n-2) + binomial(n-2, n-3).
G.f.: (x^2-1)/Q(0), where Q(k)= 4*x - 1 + x*k - x*(x-1)*(k+1)/Q(k+1); (continued fraction). - Sergei N. Gladkovskii, May 05 2013
|
|
MATHEMATICA
|
CoefficientList[Series[(1 + x + x^2 + x^3) / (1 - x)^2, {x, 0, 100}], x] (* Vincenzo Librandi, Nov 03 2018 *)
LinearRecurrence[{2, -1}, {1, 3, 6, 10}, 60] (* Harvey P. Dale, Jul 08 2019 *)
|
|
PROG
|
(PARI) x='x+O('x^66); Vec((1+x+x^2+x^3)/(1-x)^2) \\ Joerg Arndt, May 06 2013
(Magma) [4*n-2+2*Binomial(0, n)+Binomial(1, n): n in [0..80]]; // Vincenzo Librandi, Nov 03 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|