The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A291526 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A291526

a(n) = 2^n*(n - 3) + 4.
(history; published version)

#9 by Ray Chandler at Fri Sep 01 14:10:39 EDT 2017

STATUS

editing

approved

#8 by Ray Chandler at Fri Sep 01 14:10:36 EDT 2017

LINKS

<a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (5, -8, 4).

STATUS

approved

editing

#7 by Bruno Berselli at Fri Aug 25 13:43:04 EDT 2017

STATUS

editing

approved

#6 by Bruno Berselli at Fri Aug 25 13:42:56 EDT 2017

FORMULA

a(n) = 4*A000337(n-2), with A000337(-1) = 0.

#5 by Bruno Berselli at Fri Aug 25 13:41:51 EDT 2017

FORMULA

a(n) = 4*A000337(n-2).

CROSSREFS

Cf. A000337.

#4 by Bruno Berselli at Fri Aug 25 13:34:52 EDT 2017

FORMULA

a(n) = 2^n*(n - 3) + 4.

G.f.: 4*x^3/((1 - 2*x)^2*(1 - x)).

G.f.: -((4 x^3)/((1 - 2 x)^2 (-1 + x))).

MATHEMATICA

CoefficientList[Series[-((4 x^2)3/((1 - 2 x)^2 (-1 + - x))), , {x, 0, 20}], x]

STATUS

proposed

editing

#3 by Eric W. Weisstein at Fri Aug 25 12:27:33 EDT 2017

STATUS

editing

proposed

#2 by Eric W. Weisstein at Fri Aug 25 12:27:19 EDT 2017

NAME

allocated for Eric W. Weisstein

a(n) = 2^n*(n - 3) + 4.

DATA

0, 0, 4, 20, 68, 196, 516, 1284, 3076, 7172, 16388, 36868, 81924, 180228, 393220, 851972, 1835012, 3932164, 8388612, 17825796, 37748740, 79691780, 167772164, 352321540, 738197508, 1543503876, 3221225476, 6710886404, 13958643716, 28991029252, 60129542148

OFFSET

1,3

COMMENTS

Also the skewness of the (n+1)-hypercube graph.

LINKS

Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/GraphSkewness.html">Graph Skewness</a>

Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/HypercubeGraph.html">Hypercube Graph</a>

FORMULA

a(n) = 2^n*(n - 3) + 4.

a(n) = 5*a(n-1) - 8*a(n-2) + 4*a(n-3).

G.f.: -((4 x^3)/((1 - 2 x)^2 (-1 + x))).

MATHEMATICA

Table[2^n (n - 3) + 4, {n, 20}]

LinearRecurrence[{5, -8, 4}, {0, 0, 4}, 20]

CoefficientList[Series[-((4 x^2)/((1 - 2 x)^2 (-1 + x))), {x, 0, 20}], x]

KEYWORD

allocated

nonn,easy

AUTHOR

Eric W. Weisstein, Aug 25 2017

STATUS

approved

editing

#1 by Eric W. Weisstein at Fri Aug 25 12:27:19 EDT 2017

NAME

allocated for Eric W. Weisstein

KEYWORD

allocated

STATUS

approved