A107508 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Other ways to Give

A107508

Coordination sequence for D_13 lattice

1, 312, 18642, 447096, 6004674, 53600248, 353024594, 1839267768, 7960151810, 29653889720, 97649896786, 290078713080, 789747027394, 1995416563064, 4726400795090, 10581459177016, 22543374588930, 45962181162040, 90105620342738, 170538349148024, 312685497919938

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

OFFSET

0,2

LINKS

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

Index entries for linear recurrences with constant coefficients, signature (13,-78,286,-715,1287,-1716,1716,-1287,715,-286,78,-13,1).

FORMULA

G.f.: -(x + 1)*(x^12 + 298*x^11 + 14366*x^10 + 214434*x^9 + 1343551*x^8 + 3959604*x^7 + 5686084*x^6 + 3959604*x^5 + 1343551*x^4 + 214434*x^3 + 14366*x^2 + 298*x + 1) / (x - 1)^13. [Colin Barker, Nov 20 2012]

MATHEMATICA

CoefficientList[Series[-(x+1)(x^12+298x^11+14366x^10+214434x^9+ 1343551x^8+ 3959604x^7+ 5686084x^6+3959604x^5+1343551x^4+214434x^3+14366x^2+298x+1)/ (x-1)^13, {x, 0, 40}], x] (* or *) LinearRecurrence[{13, -78, 286, -715, 1287, -1716, 1716, -1287, 715, -286, 78, -13, 1}, {1, 312, 18642, 447096, 6004674, 53600248, 353024594, 1839267768, 7960151810, 29653889720, 97649896786, 290078713080, 789747027394, 1995416563064}, 40] (* Harvey P. Dale, Dec 04 2021 *)

CROSSREFS

Sequence in context: A022044 A156403 A296527 * A015704 A156406 A283492

Adjacent sequences: A107505 A107506 A107507 * A107509 A107510 A107511

KEYWORD

nonn,easy

AUTHOR

N. J. A. Sloane, May 28 2005

STATUS

approved