%I#11 2023年1月21日13:17:44
%S 3,15120108014040196560393120082555200198132480049533120000,
%电话1585059844000052306974720000177843714048000065802174197760000,
%U 25004826195148800001125217178781696000005401042458152140800000
%N第一个N(半素数-1)的乘积。
%A005867的C半素数类似物。
%F a(n)=生产[从i=1到n](A001358(i)-1)。
%e a(10)=3*5*8*9*13*14*20*21*24*25=
%e(4-1)*(6-1)*。
%t FoldList[Times,Select[Range[50],PrimeOmega[#]==2&]-1](*哈维·P·戴尔,2023年1月21日*)
%o(PARI)A001358(n)={
%o如果(n==1,
%o返回(4),
%o对于(a=A001358(n-1)+100000000000000,
%o如果(bigomega(a)==2,
%o返回(a)
%o);
%o);
%o);
%o}(o)
%o A112228(n)={
%o触头(i=1,n,A001358(i)-1)
%o}/*R.J.Mathar,2012年3月9日*/
%Y参考A001358、A005867。
%K容易,不是
%O 1,1号机组
%A _乔纳森·沃斯帖子_,2005年11月28日
|