%I#15 2017年5月31日15:57:08

%S 1,3,7,19,5815242299523596294145073637088198187786386993，

%电话84003319019303851372808847163888573000190256613547103229263，

%电话：193020113389750088075998898313592500122350842201373739302157480440551084313107319774152370

%N A002110（N）<=k<A002110。

%C Primarial A002110（n）是具有n个素因子的最小无平方数。a（n）是一个无平方数列表，其中n个素数因子大于并包含A002110（n）但小于A002110的素数因子（n+1）。

%C a（1）计算小于6的第一个素数。

%C a（2）计算小于30的第一个无平方半素数（A006881）。

%C a（3）计算A033992中小于210的最小项，以此类推。

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/Primorial.html“>初级</a>

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/Squarefree.html“>无方块</a>

%e设p_n#=A002110（n）。

%e a（0）=1，因为在p0和（p1#-1）（即1和1）之间，只有1是素数因子为0的无平方数。

%e a（1）=3，因为对于p_1#<=k<=（p_2#-1），即2<=k<=5，存在三个素数{2，3，5}。

%e a（2）=7，因为我们发现了6到29之间的无平方半素数{6,10,14,15,21,22,26}。

%t表[Count[Range[#，Prime[n+1]#-1]&@Product[Prime@i，{i，n}]，k_/；和[SquareFreeQ@k，PrimeOmega@k==n]]，{n，0，6}]

%Y参见A001221、A002110、A005117、A006881、A033992。

%K nonn，硬

%O 0,2

%2017年5月25日，A _Michael De Vlieger_

%E a（25）-a（31），来自_David a.Corneth，2017年5月31日