搜索: a076730-编号:a076730-
|
|
|
|
0, 1, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 2, 1, 0, 1, 2, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 2, 1, 0, 1, 1, 0, 2, 1, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 1, 2, 0, 2, 1, 0, 1, 0, 0, 2, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 1, 0, 0, 1, 0, 2, 1, 0, 0, 2, 0, 3, 2, 0
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
1,13
|
|
评论
|
考虑所有k!k位数字n的数字排列,丢弃初始零,计算不同素数。
|
|
链接
|
|
|
例子
|
a(20)=1,因为从{02,20}我们得到{2,20},只有2是素数。
从107中我们得到4个素数:(0)17,(0)71,107和701;因此a(107)=4。
|
|
数学
|
表[Count[FromDigits/@Permutations[IntegerDigits[n]],_?素数Q],{n,110}](*哈维·P·戴尔2011年6月26日*)
|
|
黄体脂酮素
|
(PARI)for(x=1400,print1(permprime(x),“,”)/*for函数permprime的定义,请参阅link*/\\西诺·希利亚德,2009年6月7日
(PARI)A039999号(n,D=vecsort(digits(n)),S)={forperm(D,p,isprime(from digits(Vec(p)))&&S++);S}\\当数字已知时,给出第二个arg可以避免计算,并提高效率。必须排序,因为forperm()只考虑“较大”排列-M.F.哈斯勒2019年10月14日
(岩浆)[#[s:s在Seqset中([Seqint([m(p[i]):i在[1..#x]]中,10):p在置换中(Seqset(x))])|IsPrime(s)],其中m是map中的//克劳斯·布罗克豪斯2009年6月15日
(哈斯克尔)
导入数据。列表(排列,nub)
a039999 n=长度$过滤器((==1)。a010051)
(映射读取(nub$permutations$show n)::[Integer])
(Python)
从sympy导入isprime
从itertools导入排列
定义a(n):返回len(如果isprime(t:=int(“”.join(p))),则设置(t代表置换中的p(str(n)))
打印([a(n)用于范围(1106)]中的n)#迈克尔·布拉尼基2024年2月17日
|
|
交叉参考
|
|
|
关键字
|
非n,基础,美好的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
A075053号
|
| 通过重新排列n的部分或全部数字可以形成的素数(以重复计数)。 |
|
+10 14
|
|
|
0, 0, 1, 1, 0, 1, 0, 1, 0, 0, 0, 1, 1, 3, 1, 1, 1, 3, 0, 1, 1, 1, 2, 3, 1, 2, 1, 2, 1, 2, 1, 3, 3, 2, 2, 3, 1, 4, 2, 1, 0, 1, 1, 2, 0, 1, 0, 2, 0, 0, 1, 1, 2, 3, 1, 2, 1, 2, 1, 2, 0, 1, 1, 1, 0, 1, 0, 2, 0, 0, 1, 3, 2, 4, 2, 2, 2, 2, 1, 3, 0, 0, 1, 2, 0, 1, 0, 1, 0, 1, 0, 1, 2, 1, 0, 2, 0, 3, 1, 0, 0, 2, 1, 4, 2
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
0,14
|
|
评论
|
“重复计数”是指如果可以使用不同的数字获得相同的素数,则对其进行数次计数(例如,使用第1位和第3位或第2位和第三位从113中获得13),但如果将其作为相同数字的不同排列(例如,a(11))获得,则不进行数次=1,因为数字[1,1]的相同置换和换位(2,1)都产生11,但由于使用了相同的数字,因此这不会计算两次)-M.F.哈斯勒2014年3月12日
|
|
链接
|
M.F.Hasler,素数,OEIS wiki,2014年,2019年更新。
|
|
配方奶粉
|
a(n)=S(n)}中的和{kA039999号(k) ,如果n不超过一个数字0,其中S(n)是其非零数字是n的子序列的数字,如果n包含数字0,则包含数字0-M.F.哈斯勒,2019年10月15日
|
|
例子
|
从13中我们可以得到3、13和31,因此a(13)=3。同样,a(17)=3。
从22中我们用两种方法得到2,因此a(22)=2。
a(101)=2,因为从101的数字可以形成素数11(使用数字1&3)和101(使用所有数字)。使用所有3位数字形成的素数11=011不能单独计算,因为它有一个前导零。
a(111)=3,因为可以使用数字1&2、1&3或2&3形成素数11。
|
|
数学
|
f[n_]:=长度@Select[Union[FromDigits@#&/@Flatten[Subsets@#&#/@Permutations@IntegerDigits@n,1]],PrimeQ@#&];数组[f,105,0](*罗伯特·威尔逊v2014年3月12日*)
|
|
黄体脂酮素
|
(PARI)A075053号(n,D=vecsort(digits(n)),S=0)=对于(b=1,2^#D-1,对于perm(vecextract(D,b),p,p[1]&isprime(from digities(Vec(p)));第二个可选参数允许给出已知数字-M.F.哈斯勒,2019年10月14日,取代2014年的早期代码。
(Python)
从itertools导入组合
从sympy.utilities.iterables导入multiset_permutations
从sympy导入isprime
定义A075053号(n) :如果b[0]!='0'和isprime(int(''.join(b)))#柴华武2022年9月13日
|
|
交叉参考
|
|
|
关键字
|
非n,基础,容易的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
A076449号
|
| 数字可以精确构成n个不同素数的最小数(不一定使用所有数字)。 |
|
+10 8
|
|
|
1, 2, 25, 13, 37, 107, 127, 113, 167, 1027, 179, 137, 1036, 1127, 1013, 1137, 1235, 1136, 1123, 1037, 1139, 1079, 10124, 10126, 1349, 1279, 1237, 3479, 10699, 1367, 10179, 1379, 10127, 10079, 10138, 10123, 10234, 10235, 10247, 10339, 10267
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
0,2
|
|
评论
|
Mike Keith推测a(n)总是存在的,并报告说他已经检查了n≤66-N.J.A.斯隆2008年1月25日
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
a(10)=179,因为179是包含10个素数(即7、17、19、71、79、97、179、197、719、971)的最小数。
|
|
数学
|
(*先做*)需要[“DiscreteMath`Combinatorica`”](*然后*)f[n_]:=长度[Select[FromDigits/@Flatten[Permutations/@Subsets[InterDigits[n]],1],PrimeQ[#]&]];t=表[0,{50}];做[a=f[n];如果[a<50&&t[[a+1]]==0,t[[a+1]]=n],{n12500}];t吨(*罗伯特·威尔逊v2005年2月12日*)
|
|
黄体脂酮素
|
(Python)#参见链接程序
|
|
交叉参考
|
|
|
关键字
|
基础,非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
0, 1, 3, 4, 5, 7, 11, 14, 19, 21, 26, 29, 31, 33, 35, 41, 53, 55, 60, 64, 89, 96, 106, 122, 153, 188, 248, 311, 349, 402, 421, 547, 705, 812, 906, 1098, 1162, 1268, 1662, 1738, 1953, 2418, 2920, 3133, 3457, 4483, 4517, 4917, 5174, 5953, 6552, 6799, 8938, 10219
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
a(3)=3,因为素数A072857号(3) =13可用于创建3个质数,即3、13和31。
a(6)=7,因为素数A072857号(7) =113可以用来创建7个素数,即3、11、13、31、113、131和311。(因此,两个素数13和31可以通过两种方式获得A075053号(113)=9.)
|
|
数学
|
需要[“离散数学`组合数学`”];f[n_]:=块[{a=Drop[Sort[Subsets[IntegerDigits[n]]],1],b=c={},k=1,l},l=长度[a]+1;而[k<l,b=追加[b,置换[a[[k]]];k++];b=联管节[压扁[b,1]];l=长度[b]+1;k=1;而[k<l,c=附加[c,FromDigits[b[k]]];k++];计数[PrimeQ[Union[c]],True]];d=-1;Do[b=f[n];如果[b>d,打印[b];d=b],{n,1,10^6}]
|
|
交叉参考
|
|
|
关键字
|
基础,非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
2, 37, 137, 1379, 13679, 123479, 1234679, 12345679, 102345679, 1123456789, 10123456789
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
原定义:最小n位数m(即m>=10^(n-1))A076730型(n) =m<10^n时的最大值A039993号(m) =使用m的部分或全部数字可以形成的素数。
|
|
链接
|
|
|
配方奶粉
|
|
|
黄体脂酮素
|
|
|
交叉参考
|
|
|
关键字
|
非n,基础,更多
|
|
作者
|
|
|
扩展
|
重新编写定义并将a(6)-a(11)的值添加到M.F.哈斯勒2014年3月11日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
|
抵消
|
1,2
|
|
评论
|
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
a(2)=4=A075053号(37),因为从37中可以得到素数{3,7,37,73},而且显然没有2位数可以给出更多的素数。
a(3)=11=A075053号(137),因为从137中可以得到素数{3,7,13,17,31,37,71,73,137,173,317},并且没有3位数产生更多。
a(4)=31=A075053号(1379),因为从1379可以得到31个素数{3,7,13,17,19,31,37,71,73,79,97,137,139,173,179,193,197,317,379,397,719,739,937,971,1973,3719,3917,7193,9137,9173,9371},没有4位数产生更多。
|
|
黄体脂酮素
|
(PARI)A134597号(n) ={my(m=0);forvec(D=向量(n,i,[0,9]),vecsum(D)%3||next;m=最大(A075053号(来自数字(D)、D)、m)、1);米}\\M.F.哈斯勒2019年10月14日
|
|
交叉参考
|
|
|
关键字
|
非n,基础,更多
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
搜索在0.010秒内完成
|