日期：2007年3月3日星期六20:36:43+0100发件人：Richard Mathar（Mathar（AT）strw.leidenoniv.nl）Maple程序生成b005105.txt到b005108.txt、b081633.txt等。##Maple生成带有类+1的b文件##等级+13素数。##警告：将在额外的目录中运行，因为它将覆盖##b090468.txt等文件（如OEIS中的文件）可能包含更多##在有限的运行时间内会产生比这里更大的术语。a:=proc（n）选项记忆；局部p、pf、e、res；如果是素数（n），则pf:=系数（n+1）[2]；分辨率：=1；对于e从1到nops（pf）dop:=op（1，op（e，pf））；如果p＞3，那么res：=最大值（res，a（p）+1）；fi；od；返回（res）；其他的-1 ;fi；结束时间：p:=2：nA005105:=1:#一级+nA005106:=1:#二级+nA005107:=1:#三级+nA005108:=1:#四级+nA081633:=1:#第5类+nA081634:=1:#第6类+nA081635:=1:#7级+nA081636:=1:#8级+nA081637:=1:#第9类+nA081638:=1:#10级+nA081639:=1:#11级+nA084071:=1:#12级+nA090468:=1:#等级13+nA14:=1:#等级14+尚未加入OEISnA15:=1:#15+级尚未进入OEISnA16:=1:#等级16+尚未加入OEISn从1到2800000 doc：=a（p）；如果c=1，则fprintf（“b005105.txt”，“%d%d\n”，nA005105，p）；nA005105：=nA005105+1；elif c=2，则fprintf（“b005106.txt”，“%d%d\n”，nA005106，p）；nA005106：=nA005106+1；elif c=3，则fprintf（“b005107.txt”，“%d%d\n”，nA005107，p）；nA005107：=nA005107+1；elif c=4，则fprintf（“b005108.txt”，“%d%d\n”，nA005108，p）；nA005108：=nA005108+1；elif c=5，则fprintf（“b081633.txt”，“%d%d\n”，nA081633，p）；nA081633：=nA08163+1；elif c=6，则fprintf（“b081634.txt”，“%d%d\n”，nA081634，p）；nA081634：=nA081364+1；elif c=7，则fprintf（“b081635.txt”，“%d%d\n”，nA081635，p）；nA081635：=nA08165+1；elif c=8，则fprintf（“b081636.txt”，“%d%d\n”，nA081636，p）；nA081636：=nA08136+1；elif c=9，则fprintf（“b081637.txt”，“%d%d\n”，nA081637，p）；nA081637：=nA08167+1；elif c=10，则fprintf（“b081638.txt”，“%d%d\n”，nA081638，p）；nA081638：=nA08168+1；elif c=11，则fprintf（“b081639.txt”，“%d%d\n”，nA081639，p）；nA081639：=nA081369+1；elif c=12，则fprintf（“b084071.txt”，“%d%d\n”，nA084071，p）；nA084071:=nA084071+1；elif c=13，则fprintf（“b090468.txt”，“%d%d\n”，nA090468，p）；nA090468：=nA090448+1；elif c=14，则fprintf（“b14.txt”，“%d%d\n”，nA14，p）；nA14：=nA14+1；elif c=15，则fprintf（“b15.txt”，“%d%d\n”，nA15，p）；nA15:=nA15+1；elif c=16，则fprintf（“b16.txt”，“%d%d\n”，nA16，p）；nA16：=nA16+1；fi；#打印f（“%d%d%d\n”，n，p，c）；printf（“%d%d%d\n”，n，c）；p：=下一个顶点（p）：结束时间：