|
|
A068634
|
|
a(n) = lcm(n, R(n)), where R(n) (A004086) = digit reversal of n.
|
|
5
|
|
|
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 84, 403, 574, 255, 976, 1207, 162, 1729, 20, 84, 22, 736, 168, 1300, 806, 216, 1148, 2668, 30, 403, 736, 33, 1462, 1855, 252, 2701, 3154, 1209, 40, 574, 168, 1462, 44, 270, 1472, 3478, 336, 4606, 50, 255, 1300, 1855, 270, 55
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
a(12) = lcm(12,21) = 84.
|
|
MAPLE
|
r:= proc(n) local q;
`if`(n<10, n, irem(n, 10, 'q') *10^(length(n)-1) +r(q))
end:
a:= n-> ilcm(n, r(n)):
|
|
MATHEMATICA
|
Array[LCM[#, FromDigits[Reverse[IntegerDigits[#]]]]&, 50] (* Harvey P. Dale, Dec 13 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|