|
|
|
|
1, 12, 104, 1006, 10008, 100010, 1000012, 10000014, 100000016, 1000000018, 10000000020, 100000000022, 1000000000024, 10000000000026, 100000000000028, 1000000000000030, 10000000000000032, 100000000000000034
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
CoefficientList[Series[(1-19*x^2)/((1-x)^2*(1-10*x)), {x, 0, 40}], x] (* Vincenzo Librandi, Jul 06 2012 *)
LinearRecurrence[{12, -21, 10}, {1, 12, 104}, 20] (* Harvey P. Dale, Dec 01 2015 *)
|
|
PROG
|
(Magma) I:=[1, 12]; [n le 2 select I[n] else 11*Self(n-1)-10*Self(n-2)-18: n in [1..20]]; // Vincenzo Librandi, Jul 06 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|