%I#51 2020年1月3日19:47:15

%S 1,2,4,3,7,6,5,17,13,8,11,59,41,19,9,31277179,67,23,101271787，

%电话：1063331,83,29,12709152998527221431109,37,145381167449，

%电话：87803195773001599157,43,155271126973311288892196132745743979191,47

%N素数的离散（向下反对偶读取的数组）。

%当且仅当数字不在第1列时，它才是质数。作为序列，自然数的排列。该离散的分形序列为A022447，换位序列为A114538。

%C合成数的离散度见A114577。

%D Alexandrov，卢博米尔。《关于非共鸣素数分布》，arXiv预印本math/9811096（1998）。（见附录。）

%D Clark Kimberling，“分形序列和间隔”，《阿尔斯·科林巴托利亚》，45（1997）157-168。

%H Robert G.Wilson v，<a href=“/A114537/b114537.txt”>n表，n=1.172的a（n）</a>

%H Neil Fernandez，<a href=“http://www.borve.org/primeness/FOP.html“>素数阶，F（p）</a>

%H Neil Fernandez，<a href=“/A006450/A006450.html”>素数顺序</a>[缓存副本，经作者许可后包含]

%H Neil Fernandez，<a href=“http://www.borve.org/primeness/intro.html“>探索初级项目</a>

%H克拉克·金伯利，<a href=“http://faulty.evansville.edu/ck6/integer/spers.html“>相互扩散和分散。

%H克拉克·金伯利，<a href=“http://dx.doi.org/10.1090/S0002-9939-1993-1111434-0“>间断和分散，《美国数学学会学报》，117（1993）313-321。

%H Robert G.Wilson v，《素数阵列的西北角》（The Northwest Corner of The Primeness Array）（24 x 24）</a>

%F T（r，1）=A018252（r）。T（r，c）=素数（T（r、c-1）），c>1。[R.J.Mathar_，2010年10月22日]

%e Primeness阵列的西北角：

%电子邮箱：1 2 3 5 11 31 127 709 5381 52711 648391

%e 4 7 17 59 277 1787 15299 167449 2269733 37139213 718064159

%电子邮箱6 13 41 179 1063 8527 87803 1128889 17624813 326851121 7069067389

%电子邮箱：8 19 67 331 2221 19577 219613 3042161 50728129 997525853 22742734291

%电子邮箱：9 23 83 431 3001 27457 318211 4535189 77557187 1559861749 36294260117

%电子邮箱：10 29 109 599 4397 42043 506683 7474967 131807699 2724711961 64988430769

%电子邮箱：12 37 157 919 7193 72727 919913 14161729 259336153 5545806481 136395369829

%电子14 43 191 1153 9319 96797 1254739 19734581 368345293 8012791231 200147986693

%电子邮箱：15 47 211 1297 10631 112129 1471343 23391799 440817757 9672485827 243504973489

%电子邮箱：16 53 241 1523 12763 137077 1828669 29499439 563167303 12501968177 318083817907

%电子邮箱：18 61 283 1847 15823 173867 2364361 38790341 751783477 16917026909 435748987787

%电子邮箱：20 71 353 2381 21179 239489 3338989 56011909 1107276647 25366202179 664090238153

%电子邮箱：21 73 367 2477 22093 250751 3509299 59053067 1170710369 26887732891 705555301183

%电子邮箱：22 79 401 2749 24859 285191 4030889 68425619 1367161723 31621854169 835122557939

%e 24 89 461 3259 30133 352007 5054303 87019979 1760768239 41192432219 109926100167

%电子邮箱：25 97 509 3637 33967 401519 5823667 101146501 2062666783 48596930311 1305164025929

%电子邮箱：26 101 547 3943 37217 443419 6478961 113256643 2323114841 55022031709 1484830174901

%电子邮箱：27 103 563 4091 38833 464939 6816631 119535373 2458721501 58379844161 1579041544637

%p A114537:=proc（r，c）选项记忆；如果c=1，则为A018252（r）；否则为ithprime（procname（r，c-1））；结束条件：；结束程序：#_R.J.Mathar_，2010年10月22日

%t非素数[n_]：=固定点[n+PrimePi@#+1&，n]；t[n_，k_]：=嵌套[素数，非素数[n]，k]；表[t[n-k，k]，{n，0,9}，{k，n，0，-1}]//扁平

%t（*或查看表格*）表格[t[n，k]，{n，0，6}，{k，0，10}]//TableForm（*_Robert G.Wilson v_，2005年12月26日*）

%Y列1-13:A018252、A007821、A049078、A0490.79、A049080、A0490.81、A058322、A058342、A05.8325、A05832、A058316、A058372、A05328、A093046。

%Y第1-7行：A007097、A057450、A057451、A0574.52、A05745%、A05745、A057475和A057457。

%Y对角线：A181441。

%Y参考A000040、A007821、A114538、A006450。

%如果反对偶项被反方向读取，我们得到A138947。

%K non，tabl，不错

%O 1,2号机组

%A_Clark Kimberling_，2005年12月7日