login
A068823
a(n) = lcm(n, c(n)), where c(n) is the 10's complement of n.
1
9, 8, 21, 12, 5, 12, 21, 8, 9, 90, 979, 264, 1131, 602, 255, 336, 1411, 738, 1539, 80, 1659, 858, 1771, 456, 75, 962, 1971, 504, 2059, 210, 2139, 544, 2211, 1122, 455, 576, 2331, 1178, 2379, 120, 2419, 1218, 2451, 616, 495, 1242, 2491, 624, 2499, 50
OFFSET
1,1
LINKS
EXAMPLE
a(45) = 495 as 10's complement of 45 is 100 - 45 = 55 and lcm(45, 55) = 495.
MAPLE
a:=n-> ilcm((10^length(n)-n), n):
seq(a(n), n=1..100); # Alois P. Heinz, Sep 22 2015
MATHEMATICA
LCM[#, 10^(IntegerLength[#]) - #] & /@ Range[50] (* Jayanta Basu, Aug 07 2013 *)
CROSSREFS
Cf. A068822.
Sequence in context: A296615 A340446 A063561 * A264301 A251091 A159078
KEYWORD
easy,nonn,look,base
AUTHOR
Amarnath Murthy, Mar 08 2002
EXTENSIONS
a(20) corrected by Jayanta Basu, Aug 07 2013
STATUS
approved