%I#12 2022年3月8日11:37:54
%南21,6155111177635258771639291378494323
%N a(N)是A175648的N个成员序列在映射k->3*k+4下的第一个开始。
%Ca(n),3*a(n。。。,3^(n-1)*a(n)+2*3^。
%e a(3)=155,因为155、3*155+4=469和3*469+4=1411在A175648中,但3*1411+4=4237不在(155=5*31、159=3*53、469=7*67、473-11*43、1411=17*83和1415=5*283是半素数,但4241是素数)。
%pf:=proc(n)选项记忆;
%p如果numtheory:-bigomega(n)=2且numtheori:-bigomega(n+4)=2,则1+进程名(3*n+4
%p端程序:
%p V:=矢量(7):计数:=0:
%计数<7 do时,nn从1开始为p
%p v:=f(nn);
%p如果v>0且v[v]=0,则计数:=计数+1;V[V]:=nn;fi(菲涅耳)
%操作说明:
%p转换(V,列表);
%Y参考A001358、A175648、A352132。
%K nonn,更多
%O 1,1号机组
%A _J.M.Bergot和_Robert Israel,2022年3月5日
|