|
|
A014923
|
|
a(1) = 1, a(n) = n*9^(n-1) + a(n-1).
|
|
3
|
|
|
1, 19, 262, 3178, 35983, 390277, 4110364, 42374116, 429794605, 4303999495, 42658627906, 419231343214, 4090815317467, 39676936914073, 382828823738488, 3677086937252872, 35178430147734169
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
CoefficientList[Series[1/((1 - x)(1 - 9*x)^2), {x, 0, 40}], x] (* Vincenzo Librandi, Oct 23 2012 *)
|
|
PROG
|
(Magma) I:=[1, 19]; [n le 2 select I[n] else 18*Self(n-1) - 81*Self(n-2) + 1: n in [1..30]]; // Vincenzo Librandi, Oct 23 2012
(PARI) Vec(x/((1 - x)*(1 - 9*x)^2) + O(x^30)) \\ Jinyuan Wang, Mar 11 2020
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|