|
|
A068667
|
|
a(1) = 7; a(n) = smallest palindromic multiple of a(n-1).
|
|
10
|
|
|
7, 77, 616, 6776, 88088, 616616, 232464232, 21154245112, 232696696232, 21175399357112, 21154245133154245112, 232696696464696696232, 21175399378287399357112, 63386501441764911946714410568336
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
a[1] = 7; a[n_] := a[n] = Block[{k = 2}, While[k*a[n - 1] != ToExpression[ StringReverse[ ToString[k*a[n - 1]]]], k++ ]; k*a[n - 1]]; Table[a[n], {n, 1, 14}]
|
|
CROSSREFS
|
Cf. A068664 (from a(6) on) and this sequence (from a(3) on) coincide.
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|