%I#59 2024年4月22日08:38:16

%S 30,42,60,66,70,78,84,90102105110114120126130132138140150，

%电话154156165168170174180182186190195204220222228230，

%电话：23123423824024625225525826026426627273276280285286

%可以被三个不同素数整除的数。

%C该序列和A000977的前32项相同，但A000977-（33）=210。[评论由_Jon E.Schoenfield_编辑，2014年12月30日]

%H T.D.Noe，n表，n=1..1000的a（n）</a>

%H Hans Montanus和Ron Westdijk，<a href=“https://greenbluemath.nl/wp-content/uploads/2024/03/Cellular-Automation-and-Biomials.pdf“>细胞自动化和二项式，绿蓝数学（2022），第90页。

%Fω（a（n））=A001221（a（n））=3.-_乔纳森·沃斯邮报，2005年9月20日

%F a（n）~2n log n/（log log n）^2。-_Charles R Greathouse IV_，2016年7月28日

%e 220=2*2*5*11在这里，但210=2*3*5*7不在这里；比较A000977。

%p A033992:=程序（n）

%p如果（nops（numtheory[factorset]（n））=3），则

%p返回（n）

%p fi：结束：seq（A033992（n），n=1..500）；#_Jani Melik，2011年2月24日

%t选择[Range[300]，PrimeNu[#]==3&]（*哈维·P·戴尔，2013年5月1日*）

%o（哈斯克尔）

%o a033992 n=a033992_列表！！（n-1）

%o a033992_list=过滤器（（==3）。a001221）[1..]

%o——Reinhard Zumkeller，2013年5月3日

%o（PARI）是（n）=ω（n）==3\\查尔斯·格里特豪斯IV，2015年4月28日

%o（PARI）A246655（lim）=my（v=列表（素数（[2，lim\=1]））；对于（e=2，logint（lim，2），forprime（p=2，sqrtnint（lim、e），listput（v，p^e））；集合（v）

%o列表（lim，pr=3）=如果（pr==1，返回（A246655（lim））；my（v=List（），pr1=pr-1，mx=prod（i=1，pr1，质数（i）））；对于素数（p=素数（pr），lim\mx，my（u=列表（lim\p，pr1））；对于（i=1，#u，listput（v，p*u[i]））；集（v）\\_Charles R Greathouse IV_，2023年2月3日

%Y A225228是一个子序列。

%A125666的Y行3。

%Y参见A000977、A000961、A001221、A112802。

%K nonn，已更改

%O 1,1号机组

%Abos Elemer（_L）_