%I#28 2022年4月27日19:16:15

%序号16,17,20,25,26,35,37,47,88,941251271343263283688425698，

%电话：7007341303142720112542269938384214513763148669904112244，

%电话：13520146092373213994386749471

%N数N，这样N！3-3^8是素数，其中n！3=n！！！是三阶阶乘数（A007661）。

%C n=5和n=8产生绝对值为素数的值（-6551和-6481）。

%C对应的素数是：5167920287941822396086014392504895839。。。

%Ca（40）>50000。

%C项>26对应于可能素数。

%H Henri&Renaud Lifchitz，<a href=“http://www.primenumbers.net/prptop/searchform.php？form=n!3-6561和amp；action=搜索“>PRP记录。搜索n！3-6561</a>

%H乔·麦克莱恩，<a href=“http://web.archive.org/web/20091027034731/http://uk.geocities.com/nassarawa%40btinternet.com/probprim2.htm“>可能素数的有趣来源</a>

%H OpenPFGW项目，<a href=“http://sourceforge.net/projects/openpfgw/“>基本测试仪</a>

%e 16！3-3^8=16*13*10*7*4*1-6561=51679是素数，所以16在序列中。

%t多因子[n_，k_]：=如果[n<1，1，If[n<k+1，n，n*多因子[n-k，k]]；

%t选择[Range[0，50000]，PrimeQ[MultiFactorial[#，3]-3^8]&]

%t选择[Range[14800]，PrimeQ[Times@@Range[#，1，-3]-6561]&]（*程序生成序列的前21项。要生成更多项，请增加Range常数。*）（*Harvey P.Dale_，2022年4月27日*）

%o（PARI）针对（n=1，1e3，if（ispseudoprime（prod（i=0，floor（（n-1）/3），n-3*i）-3^8），print1（n，“，”））\\阿尔坎·阿尔图，2015年11月18日

%Y参见A007661、A037082、A084438、A123910、A242994。

%K nonn，更多

%O 1,1号机组

%2015年11月18日A报价