登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A048398号 连续数字相差1的素数。 22
2, 3, 5, 7, 23, 43, 67, 89, 101, 787, 4567, 12101, 12323, 12343, 32321, 32323, 34543, 54323, 56543, 56767, 76543, 78787, 78989, 210101, 212123, 234323, 234343, 432121, 432323, 432343, 434323, 454543, 456767, 654323, 654343, 678767, 678989 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
评论
或者,素数A033075号. -扎克·塞多夫2011年2月1日
参考文献
J.-M.De Konink,《法定法西斯》,条目67,第23页,《椭圆》,巴黎,2008年。
链接
柴华武,n=1..10000时的n,a(n)表(扎克·塞多夫的术语n=1.1500)
数学
选择[Prime[Range[10000]],#<10|| Union[Abs[Differences[Integer Digits[#]]]=={1}&]
黄体脂酮素
(哈斯克尔)
a048398 n=a048398_列表!!(n-1)
a048398_list=过滤器((==1)。a010051')a033075_列表
--莱因哈德·祖姆凯勒2012年2月21日,2010年11月4日
(Python 3.2或更高版本)
从itertools导入产品,积累
从sympy导入isprime
A048398号_列表=[2,3,5,7]
对于范围(1,17)中的l:
对于[1,3,7,9]中的d:
dlist=[d]*l
对于产品中的列表([-1,1],repeat=l):
flist=[str(d+e)代表d,e代表zip(dlist,accumporate(elist)),如果0<=d+e<10]
如果len(flist)==l且flist[-1]!='0':
n=10*int(''.join(flist[::-1]))+d
如果isprime(n):
A048398号_列表.附加(n)
A048398号_list=已排序(A048398号_列表)#柴华武2017年5月31日
交叉参考
囊性纤维变性。A010051型; 十字路口A033075号A000040型.
关键字
非n,基础
作者
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月21日03:54。包含373540个序列。(在oeis4上运行。)