|
|
A068668
|
|
a(1) = 9; a(n) = smallest palindromic multiple of a(n-1).
|
|
7
|
|
|
9, 99, 1881, 171171, 1882881, 306909603, 11355655311, 1033364633301, 1034397997934301, 10241574577547514201, 10231343244544544234313201, 112544775689989986577445211, 1023144555797698967975554413201, 102221350448336861989168633844053122201, 11233003103852144358833233885344125830130033211
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
e[1] = 9; e[n_] := e[n] = Block[{k = 2}, While[k*e[n - 1] != ToExpression[ StringReverse[ ToString[k*e[n - 1]]]], k++ ]; k*e[n - 1]]; Table[e[n], {n, 1, 13}] - Robert G. Wilson v, Apr 19 2002
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|