login
A111464
a(1) = 12, a(n+1) = lcm{a(n), Digit Reversal(a(n))}.
0
12, 84, 336, 70896, 1649679024, 2314922791895828688, 36399640682124013852413819710318544, 77273493636380731521261660069550949170528534841641864516576194470832
OFFSET
1,1
COMMENTS
Next term has 135 digits.
EXAMPLE
a(3) = lcm(84,48) = 336.
MAPLE
rev:=proc(n) local nn, nnn: nn:=convert(n, base, 10): add(nn[nops(nn)+1-j]*10^(j-1), j=1..nops(nn)) end: a[1]:=12: for n from 1 to 8 do a[n+1]:=lcm(a[n], rev(a[n])) od: seq(a[n], n=1..8); # Emeric Deutsch, Aug 11 2005
MATHEMATICA
NestList[LCM[#, FromDigits[Reverse[IntegerDigits[#]]]]&, 12, 8] (* Harvey P. Dale, Jan 09 2011 *)
CROSSREFS
Sequence in context: A213784 A085409 A303916 * A341367 A004407 A054849
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Aug 04 2005
EXTENSIONS
More terms from Emeric Deutsch, Aug 11 2005
STATUS
approved