OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
（来自的问候整数序列在线百科全书!)
A192177号 数组由到最近素数的距离决定。 5
1、2、5、3、7、10、4、9、16、11、6、13、22、17、28、8、15、26、23、36、29、12、19、34、27、52、37、96、14、21、40、35、58、53、120、97、18、25、46、41、66、59、146、121、122、20、31、50、47、78、67、188、147、148、123、24、33、56、51、88、79、206、189、190、149、11 (列表;桌子;图表;参考;听;历史;文本;内部格式)
抵消
1,2
评论
第1行：数字k，使得k=1或k=2或k-1是质数。
行r>1：数字k，使得k-r是素数而k-q不是素数，对于q=1，2。。。，r-1。
每个正整数只出现一次，因此作为一个序列，A192177号是正整数的置换。
对于r>1，第r行中的数字具有r-1的奇偶校验；例如，第2行中的数字是奇数。
链接
n=1..66时的n、a（n）表。
例子
西北角：
1....2....3....4....6....8
5....7....9....13...15...19
10…16…22…26…34…40
11...17...23...27...35...41
28…36…52…58…66…78
...
例如，16位于第3行，因为16-3是质数，而不是16-1和16-2。
数学
z=5000；（*z=使用的素数*）
row[1]=（#1[[1]&）/@Cases[Array[｛#1，PrimeQ[#1-1]| |#1==1| |#1==2｝&，｛z｝]，｛_，True｝]；
Do[row[x]=Complement[（#1[[1]]&）/@Cases[Array[{#1，PrimeQ[#1-x]}&，{z}]，{_，True}]，Flatten[Array[row，{x-1}]]，{x，2，10}]；
TableForm[数组[行，{10}]](*A192177号数组*）
扁平[表格[行[k][[n-k+1]]，{n，1，11}，{k，1，
n} ]]个(*A192177号序列*）
（*由彼得·J·C·摩西2011年6月24日*）
交叉参考
囊性纤维变性。A192175号,A192176号,192178年,A192179号.
上下文中的序列：A308021型 A333201型 A191707号*A288417型 2016年1月19日 A289108型
相邻序列：A192174号 A192175号 A192176号*192178年 A192179号 A192180型
关键词
非n,表
作者
克拉克·金伯利2011年6月24日
状态
经核准的

查找|欢迎光临|维基|寄存器|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|转换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间：美国东部夏令时2024年5月28日22:13。包含372921个序列。（在oeis4上运行。）