|
|
A111464
|
|
a(1) = 12, a(n+1) = lcm{a(n), Digit Reversal(a(n))}.
|
|
0
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Next term has 135 digits.
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|