编辑
经核准的
<a href=“/index/Pri#piden”>涉及n的十进制扩展的素数的索引项</a>
提出
非n,基础,看,表,看,改变
u[h,t_]:=选择[表[h*10^t+k,{k,0,10^t-1}],素数Q];
A[n_,k_]:=模[{l,p},l[_]={};p[_]=-1;当[长度[l[k]]<n时,p[k]=p[k]+1;l[k]=连接[l[k],u[k,p[k]]];l[k][[n]]];
表[表[A[n,1+d-n],{n,1,d}],{d,1,12}]//扁平(*Jean-François Alcover公司,2019年12月6日,来自枫叶*)
方阵A(n,k)开始: