|
| |
|
|
A097039
|
|
a(n)=Sum(i*L(i), i=0,..,n), L(i) Lucas numbers A000032.
|
|
0
| |
|
|
0, 1, 7, 19, 47, 102, 210, 413, 789, 1473, 2703, 4892, 8756, 15529, 27331, 47791, 83103, 143810, 247814, 425445, 727985, 1241981, 2113247, 3587064, 6075432, 10269457, 17326975, 29185483, 49083599, 82429278, 138244218, 231565037
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
FORMULA
| Ogf.: (t(-1-4t+t^2))/((-1+t)(-1+t+t^2)^2). a(n)=4+n*L(n+2)-L(n+3).
|
|
|
MATHEMATICA
| l[n_] := l[n] = l[n - 1] + l[n - 2]; l[0] = 2; l[1] = 1 Table[Sum[k l[k], {k, 0, n}], {n, 0, 10}]
|
|
|
CROSSREFS
| Sequence in context: A139865 A146403 A000491 * A067651 A090025 A003232
Adjacent sequences: A097036 A097037 A097038 * A097040 A097041 A097042
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Mario Catalani (mario.catalani(AT)unito.it), Jul 20 2004
|
| |
|
|
