|
%I #8 Apr 14 2018 09:40:14
%S 1,2,6,30,210,2310,2310,2310,2310,2310,9240,9240,933240,8399160,
%T 16798320,16798320,16798320,16798320,117588240,2234176560,2234176560,
%U 373107485520,93649978865520,468249894327600,41674240595156400
%N Least common multiple of first n partition numbers (A000041).
%H Harvey P. Dale, <a href="/A096775/b096775.txt">Table of n, a(n) for n = 1..192</a>
%H <a href="/index/Lc#lcm">Index entries for sequences related to lcm's</a>.
%t Module[{nn=30,p},p=PartitionsP[Range[nn]];Table[LCM@@Take[p,n],{n,nn}]] (* _Harvey P. Dale_, Apr 14 2018 *)
%K nonn
%O 1,2
%A _Reinhard Zumkeller_, Aug 16 2004
|
