OFFSET
1,2
LINKS
Andrew Howroyd, Table of n, a(n) for n = 1..500
Eric Weisstein's World of Mathematics, Complete Bipartite Graph.
Eric Weisstein's World of Mathematics, Minimal Edge Cut.
Index entries for linear recurrences with constant coefficients, signature (8,-21,22,-8).
FORMULA
a(n) = 2*(n + (2^(n-1) - 1)^2) for n > 1. - Andrew Howroyd, Dec 18 2024
G.f.: x*(1-2*x-3*x^2+18*x^3-8*x^4)/((-1+x)^2*(1-6*x+8*x^2)). - Eric W. Weisstein, Dec 18 2024
MATHEMATICA
Table[Piecewise[{{1, n == 1}}, 2 ((2^(n - 1) - 1)^2 + n)], {n, 20}]
{1} ~ Join ~ LinearRecurrence[{8, -21, 22, -8}, {6, 24, 106, 460}, 20]
CoefficientList[Series[(1 - 2 x - 3 x^2 + 18 x^3 - 8 x^4)/((-1 + x)^2 (1 - 6 x + 8 x^2)), {x, 0, 20}], x]
PROG
(PARI) a(n) = if(n==1, 1, 2*(n + (2^(n-1) - 1)^2)) \\ Andrew Howroyd, Dec 18 2024
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Eric W. Weisstein, Dec 18 2024
EXTENSIONS
a(6) onwards from Andrew Howroyd, Dec 18 2024
STATUS
approved