cp's OEIS Frontend

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

%I A068634 #16 Dec 30 2017 11:17:15
%S A068634 1,2,3,4,5,6,7,8,9,10,11,84,403,574,255,976,1207,162,1729,20,84,22,
%T A068634 736,168,1300,806,216,1148,2668,30,403,736,33,1462,1855,252,2701,3154,
%U A068634 1209,40,574,168,1462,44,270,1472,3478,336,4606,50,255,1300,1855,270,55
%N A068634 a(n) = lcm(n, R(n)), where R(n) (A004086) = digit reversal of n.
%H A068634 Alois P. Heinz, <a href="/A068634/b068634.txt">Table of n, a(n) for n = 1..10000</a>
%e A068634 a(12) = lcm(12,21) = 84.
%p A068634 r:= proc(n) local q;
%p A068634       `if`(n<10, n, irem(n, 10, 'q') *10^(length(n)-1) +r(q))
%p A068634     end:
%p A068634 a:= n-> ilcm(n, r(n)):
%p A068634 seq(a(n), n=1..100);  # _Alois P. Heinz_, Aug 16 2012
%t A068634 Array[LCM[#,FromDigits[Reverse[IntegerDigits[#]]]]&,50] (* _Harvey P. Dale_, Dec 13 2011 *)
%K A068634 base,easy,nonn,look
%O A068634 1,2
%A A068634 _Amarnath Murthy_, Feb 27 2002
%E A068634 More terms from _Alois P. Heinz_, Aug 16 2012