A068634 a(n) = lcm(n, R(n)), where R(n) (A004086) = digit reversal of n.

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

Offset: 1

Author

Amarnath Murthy, Feb 27 2002

Keywords

• base
• easy
• nonn
• look

Examples

			a(12) = lcm(12,21) = 84.
		

Links

• Alois P. Heinz, Table of n, a(n) for n = 1..10000

Programs

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)):
seq(a(n), n=1..100);  # Alois P. Heinz, Aug 16 2012

Mathematica

Array[LCM[#,FromDigits[Reverse[IntegerDigits[#]]]]&,50] (* Harvey P. Dale, Dec 13 2011 *)

Extensions

More terms from Alois P. Heinz, Aug 16 2012