login
A056147
a(1) = 1, a(m+1) = Sum_{k=1..m} lcm(m, a(k)).
3
1, 1, 4, 18, 48, 360, 450, 6174, 27000, 34200, 93250, 1776566, 11293824, 172014648, 1296688778, 20393895570, 173895132784, 3328106382492, 11622794050422, 287786755919610, 709366149217940, 17019652496034468, 198351459813601270
OFFSET
1,3
LINKS
EXAMPLE
a(5) = lcm(4,1) + lcm(4,1) + lcm(4,4) + lcm(4,18) = 4 + 4 + 4 + 36 = 48.
MATHEMATICA
Fold[Append[#1, Total@ LCM[#2, #1[[Range@ #2]] ] ] &, {1}, Range@ 22] (* Michael De Vlieger, Dec 11 2017 *)
CROSSREFS
Sequence in context: A052642 A102928 A081528 * A181857 A353162 A303737
KEYWORD
easy,nonn
AUTHOR
Leroy Quet, Aug 04 2000
STATUS
approved