%I#21 2015年12月25日21:40:31

%S 1,6,30,6042042012660126012601386027720360360360360360，

%电话：360360612612061261201612011639628011636396280116396280，

%电话：116396280116396228016396280267711440535422888026771144400

%N a（N）=lcm（s（1），。。。，其中{s（n）}=A024619和a（0）=1。

%H Robert Israel，n的表，n=0..3930的a（n）</a>

%e与A003418和A051451重叠，但不同。例如，840或720720不在这里，但1260和13860在这里，而不是那里。

%p N:=100:#得到a（0）到a（N）

%p A[0]：=1：

%p m：=0:

%p代表从2开始的s，而m<N do

%p如果nops（数论：-因子集（s））>1，则

%p m：=m+1；

%p A[m]：=ilcm（A[m-1]，s）；

%功率因数

%日期：

%p序列（A[i]，i=0..N）；#_罗伯特·伊斯雷尔（Robert Israel），2015年12月20日

%t s=选择[Range@50，！PrimePowerQ@#&]；表[LCM@@Take[s，n]，{n，Length@s}]（*_Michael De Vlieger_，2015年12月20日*）

%Y参见A024619、A003418、A051451。值的范围为A056836。所有成员都属于A025487。

%K nonn公司

%0、2

%A _Labos Elemer，2000年8月30日

%2010年11月13日，Matthew Vandermast修正了E Link输入错误，添加了交叉引用