登录
OEIS基金会由OEIS的用户捐款和西蒙斯基金会的资助。

γ

标志


提示
问候整数序列的在线百科全书!)
A0399 n中嵌入不同素数的数目。 十八
0, 1, 1、0, 1, 0、1, 0, 0、0, 1, 1、3, 1, 1、1, 3, 0、1, 1, 1、1, 3, 1、2, 1, 2、1, 2, 1、3, 3, 1、2, 3, 1、3, 3, 1、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、γ 列表图表参考文献历史文本内部格式
抵消

1,13

评论

一个(n)计数(不同)置换的n个数字序列,表示素数。

链接

诺伊,n,a(n)n=1…10000的表

C. K. Caldwell,主要词汇,原始数

J. P. Delahaye,素数猎人,1379是非常原始的(法语)[断线]

M. Keith包含许多嵌入素数的整数

W. Schneider原始数

G. Villemin的数字历书,Mike Keith原始数(法语)

例子

A(17)=3,因为我们可以得到7, 17和71。A(22)=1,因为我们只能得到一个素数(相比之下)A075053(22)=2。

A(1013)=14,因为从1013的数字排列得到的素数子集是{3, 11, 13,31, 101, 103,113, 131, 311,1013, 1031, 1103,1301, 3011 }。

Mathematica

=下降[分类[整数[整数] [n] ],1 ],B=C={},k=1,L },L=长度[a]+1;而[k],b=附加,[b,置换[a[[[k] ] ];k++];b=联合[平坦[b,1 ] ];L=长度[b]+1;k=1;而[k<L,c=附加[c,OfDigi[b[[k] ] ];k++];计数[ Primeq [联[c],真] ];需要[ [ DouthMaTy]组合图'];f[n]:=块[{a表[f[n],{n,1, 105 }]

表[UNIT[OFDIGITS/@ ](扁率[置换/ @子集[整数1 ] ],]Primeq,{n,110 }(*)哈维·P·戴尔11月29日2017*)

黄体脂酮素

(帕里)A0399(n)={i(s=[],d=veCo排序(数字(n)));(i=1, 2 ^×d-1,FopPm(VCeEx萃(d,i)),p,iSpple(FuxDiges(Vec(p)));s=SETIONG(S,[FRODIGITS(Vec(P))]);避免两个数字的相同子集的重复扫描,当二进制模式…10时,可以跳过索引I的相应范围。检测到。-哈斯勒,MAR 08 2014,简化10月15日2019

(蟒蛇)

从迭代工具导入排列

从症状输入为素数

DEFA(n):

α=L=LIST(STR(n))

α= L=[]

i在范围内(Le(L)):

置换中的X(x,i+1)中的x++**L*+= [INT(“…”.Co(x))]

〔I〕i返回的LeN(〔i为i(集)(i))

打印([a(n)为n(范围)(1, 101)])英德拉尼尔-豪什6月25日2017

交叉裁判

不同于A075053. 有关记录见A07857A07697. 也见A13496A13497.

囊性纤维变性。A0399.

语境中的顺序:A325699 A32488 A068 153*A075053 A328 516 A325517

相邻序列:γA0399 90 A03991 A03992*A0399 A0399 95 A03996

关键词

诺恩基地

作者

戴维·W·威尔逊

扩展

被编辑Robert G. Wilson五世11月25日2002

基思链接修复查尔斯8月13日2009

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改6月1日07:40 EDT 2020。包含334759个序列。(在OEIS4上运行)