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

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A008535 Coordination sequence for {A_7}* lattice. 1
1, 16, 128, 688, 2746, 8752, 23536, 55568, 118498, 232976, 428752, 747056, 1243258, 1989808, 3079456, 4628752, 6781826, 9714448, 13638368, 18805936, 25515002, 34114096, 45007888, 58662928, 75613666, 96468752, 121917616, 152737328, 189799738, 234078896 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

Colin Barker, Table of n, a(n) for n = 0..1000

G. Nebe and N. J. A. Sloane, Home page for this lattice

M. O'Keeffe, Coordination sequences for lattices, Zeit. f. Krist., 210 (1995), 905-908.

M. O'Keeffe, Coordination sequences for lattices, Zeit. f. Krist., 210 (1995), 905-908. [Annotated scanned copy]

Index entries for linear recurrences with constant coefficients, signature (7,-21,35,-35,21,-7,1).

FORMULA

G.f.: (1+x)*(1+8*x+29*x^2+64*x^3+29*x^4+8*x^5+x^6)/(1-x)^7. - Colin Barker, Mar 03 2015

E.g.f.: -1 + (36 + 252*x + 882*x^2 + 1050*x^3 + 525*x^4 + 105*x^5 + 7*x^6)*exp(x)/18. - G. C. Greubel, Nov 10 2019

MAPLE

1, seq( (7*k^6+70*k^4+175*k^2+36)/18, k=1..40);

MATHEMATICA

Table[If[n==0, 1, (36+175*n^2+70*n^4+7*n^6)/18], {n, 0, 40}] (* G. C. Greubel, Nov 10 2019 *)

PROG

(PARI) Vec(-(x+1)*(x^6+8*x^5+29*x^4+64*x^3+29*x^2+8*x+1) / (x-1)^7 + O(x^40)) \\ Colin Barker, Mar 03 2015

(PARI) vector(46, n, if(n==1, 1, (36+175*(n-1)^2+70*(n-1)^4+7*(n-1)^6)/18 ) ) \\ G. C. Greubel, Nov 10 2019

(MAGMA) [1] cat [(36+175*n^2+70*n^4+7*n^6)/18: n in [1..45]]; // G. C. Greubel, Nov 10 2019

(Sage) [1]+[(36+175*n^2+70*n^4+7*n^6)/18 for n in (1..45)]; # G. C. Greubel, Nov 10 2019

(GAP) Concatenation([1], List([1..45], n-> (36+175*n^2+70*n^4+7*n^6)/18 )); # G. C. Greubel, Nov 10 2019

CROSSREFS

Sequence in context: A153115 A138331 A290031 * A008416 A045651 A035473

Adjacent sequences:  A008532 A008533 A008534 * A008536 A008537 A008538

KEYWORD

nonn,easy

AUTHOR

N. J. A. Sloane

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 21 09:25 EST 2022. Contains 350476 sequences. (Running on oeis4.)