|
|
A221016
|
|
The Wiener index of the fullerenyl anion G[n]C[60], defined pictorially in the Arezoomand reference (see Fig. 5).
|
|
2
|
|
|
12428, 25756, 73468, 261436, 1085628, 4928956, 23182268, 109461436, 511850428, 2360346556, 10732660668, 48186107836, 213969872828, 941234202556, 4107353204668, 17801256904636, 76697127888828, 328767094400956, 1403004540430268, 5963809411835836, 25262501717354428
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
COMMENTS
|
See Table on p. 722 of the Arezoomand reference.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 10172 + 2^n*(5600*n + 4880) + 4^n*(1280*n - 2624).
G.f.: 4*(3107 - 33952*x + 133508*x^2 - 221152*x^3 + 141376*x^4)/((1-x)*(1-2*x)^2*(1-4*x)^2). - Bruno Berselli, Dec 30 2012
|
|
MAPLE
|
a := proc (n) options operator, arrow: 10172+2^n*(5600*n+4880)+4^n*(1280*n-2624) end proc: seq(a(n), n = 0 .. 20);
|
|
MATHEMATICA
|
Table[10172 + 2^n*(5600*n+4880) +4^n*(1280*n-2624), {n, 0, 20}] (* G. C. Greubel, Nov 06 2018 *)
|
|
PROG
|
(PARI) a(n) = 10172 + 2^n*(5600*n+4880) + 4^n*(1280*n-2624); \\ Andrew Howroyd, Nov 05 2018
(Magma) [10172 + 2^n*(5600*n+4880) +4^n*(1280*n-2624): n in [0..20]]; // G. C. Greubel, Nov 06 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|