搜索： a087511-编号：a087511-
|
| |
| |
|
|
|
10010101, 10100011, 1000011011, 1000110101, 1001000111, 1001001011, 1001010011, 1010000111, 1010001101, 1010010011, 1010100011, 1010110001, 1011000101, 1100001101, 1101001001, 10000101011101, 10000111100011
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
链接
|
|
|
|
MAPLE公司
|
仅由数字x和y组成的素数，出现频率相同。d1=x；d2=y；k=0；a=矢量（100）；对于（n=13000，B=二进制（n）；L=长度（B）；s=总和（j=1，长度（B），B[j]）；如果（L%2==0&s==L/2，C=向量（L，n，（d2-d1）*B[n]+d1）；p=替换（Pol（C），x，10）；if（i素数（p），if（k<100，k++；a[k]=p））；D=矢量（L，n，d2-（d2-d1）*B[n]）；q=subst（Pol（D），x，10）；如果（isprime（q），如果（k<100，k++；a[k]=q））；）；a=向量（k，n，a[n]）；向量排序（a）
|
|
|
数学
|
选择[FromDigits/@Tuples[{0，1}，14]，PrimeQ[#]&&Length[x=IntegerDigits[#]]==2*Count[x，0]&](*贾扬达·巴苏2013年5月23日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
13, 31, 1133, 1313, 1331, 3113, 3131, 3311, 111333, 113133, 113313, 113331, 131133, 131313, 131331, 133113, 133131, 133311, 311133, 311313, 311331, 313113, 313131, 313311, 331113, 331131, 331311, 333111
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
|
|
|
链接
|
|
|
|
MAPLE公司
|
排序（[seq（seq（（10^（2*d）-1）/9+2*add（10^i，i=s），s=组合：-选择（[$0..（2*d-1）]，d）），d=1..4）]）#罗伯特·伊斯雷尔2018年7月9日
|
|
|
数学
|
扁平[Table[Sort[FromDigits/@Permutations[PadRight[{}，2n，{1，3}]]，{n，3}](*哈维·P·戴尔2014年8月3日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,基础,容易的
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
29, 22929299, 29229929, 29299229, 29992229, 92922299, 99292229, 2229922999, 2229929929, 2229992299, 2292229999, 2292929299, 2292999229, 2299222999, 2299292929, 2299922929, 2922929929, 2922992299, 2929292299, 2929299229
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
有18个数字对可以产生这样的素数。(1,0),(7,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,4),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9).
|
|
|
链接
|
|
|
|
MAPLE公司
|
F： =proc（d）局部C，C；
如果d mod 3=0，则返回NULL fi；
C： =映射（t->[0，op（t）]，组合：-选择（[$1..d-1]，d/2-1））；
C： =地图（t->2*（10^d-1）/9+7*加法（10^C，C=t），C）；
op（排序（select（isprime，C））
结束进程：
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
43, 34434343, 44334343, 44343433, 3334344443, 3343443443, 3344334443, 3344344343, 3344434433, 3433434443, 3433444433, 3434444333, 3443343443, 3444334343, 4334433443, 4334443433, 4343444333, 4344333443, 4344433343
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
有18个数字对可以产生这样的素数。(1,0),(7,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,4),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9).
|
|
|
链接
|
|
|
|
MAPLE公司
|
仅由数字x和y组成的素数，出现频率相同。d1=x；d2=y；k=0；a=矢量（100）；对于（n=13000，B=二进制（n）；L=长度（B）；s=总和（j=1，长度（B），B[j]）；如果（L%2==0&s==L/2，C=向量（L，n，（d2-d1）*B[n]+d1）；p=subst（Pol（C），x，10）；if（i素数（p），if（k<100，k++；a[k]=p））；D=矢量（L，n，d2-（d2-d1）*B[n]）；q=subst（Pol（D），x，10）；如果（i素数（q），如果（k<100，k++；a[k]=q））；）；a=向量（k，n，a[n]）；向量排序（a）
|
|
|
数学
|
选择[FromDigits/@Flatten[Permutations/@Table[PadRight[{}，2n，{4，3}]，{n，5}]，1]，PrimeQ]//排序(*哈维·P·戴尔2017年8月8日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
53, 35553533, 53355353, 53533553, 3335553553, 3355335553, 3355355533, 3355533553, 3355535353, 3535355353, 3553535353, 3553555333, 3555353353, 3555353533, 3555533533, 5353353553, 5353533553, 5353553533, 5355353533
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
有18个数字对可以产生这样的素数。(1,0),(7,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,4),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9).
|
|
|
链接
|
|
|
|
数学
|
排序[Select[FromDigits/@Flatten[Permutations/@Table[PadRight[{}，2n，{3，5}]，{n，5}，1]，PrimeQ]](*哈维·P·戴尔2012年10月24日*）
|
|
|
黄体脂酮素
|
（PARI）/*仅由数字x和y组成的素数，出现频率相同。*/x=3；y=5；d1=x；d2=y；k=0；a=矢量（100）；对于（n=13000，B=二进制（n）；L=长度（B）；s=总和（j=1，长度（B），B[j]）；如果（L%2==0&s==L/2，C=向量（L，n，（d2-d1）*B[n]+d1）；p=替换（Pol（C），x，10）；if（i素数（p），if（k<100，k++；a[k]=p））；D=矢量（L，n，d2-（d2-d1）*B[n]）；q=subst（Pol（D），x，10）；如果（i素数（q），如果（k<100，k++；a[k]=q））；）；a=向量（k，n，a[n]）；向量排序（a）
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
47, 47447747, 77474447, 4447747747, 4744477747, 4744747477, 4744747747, 4747444777, 4747747447, 4774744477, 4774747447, 7444477477, 7447474477, 7744744747, 7744747447, 7747444477, 7747447447, 7747744447, 44444477777477, 44447447774777, 44447474777477
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
0,1
|
|
|
评论
|
有18个数字对可以产生这样的素数。(1,0),(7,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,4),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9).
|
|
|
链接
|
|
|
|
数学
|
表[Select[FromDigits/@Permutations[PadRight[{}，2n，{4，7}]]，PrimeQ]，{n，7}]//扁平//排序(*哈维·P·戴尔，2016年5月5日*）
|
|
|
黄体脂酮素
|
（PARI）/*仅由数字x和y组成的素数，以相等的频率出现。*/x=4；y=7；d1=x；d2=y；k=0；a=矢量（100）；对于（n=13000，B=二进制（n）；L=长度（B）；s=总和（j=1，长度（B），B[j]）；如果（L%2==0&s==L/2，C=向量（L，n，（d2-d1）*B[n]+d1）；p=替换（Pol（C），x，10）；if（i素数（p），if（k<100，k++；a[k]=p））；D=矢量（L，n，d2-（d2-d1）*B[n]）；q=subst（Pol（D），x，10）；如果（i素数（q），如果（k<100，k++；a[k]=q））；）；a=向量（k，n，a[n]）；向量排序（a）
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
44994949, 49444999, 49494499, 49499449, 94449499, 4449449999, 4449494999, 4494494999, 4494499949, 4494949499, 4494994499, 4499449949, 4499494949, 4499944949, 4944499949, 4949444999, 4994449949, 9444499949, 9444994499
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
0,1
|
|
|
评论
|
有18个数字对可以产生这样的素数。(1,0),(7,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,4),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9).
|
|
|
链接
|
|
|
|
数学
|
排序[Flatten[Table[Select[FromDigits/@Permutations[PadRight[{}，2n，{4，9}]]，PrimeQ]，{n，5}]](*哈维·P·戴尔2016年8月21日*）
|
|
|
黄体脂酮素
|
（PARI）/*仅由数字x和y组成的素数，出现频率相同。*/x=4；y＝9；d1=x；d2=y；k=0；a=矢量（100）；对于（n＝13000，B＝二进制（n）；L=长度（B）；s=总和（j=1，长度（B），B[j]）；如果（L%2==0&s==L/2，C=向量（L，n，（d2-d1）*B[n]+d1）；p=替换（Pol（C），x，10）；if（i素数（p），if（k<100，k++；a[k]=p））；D=矢量（L，n，d2-（d2-d1）*B[n]）；q=subst（Pol（D），x，10）；如果（i素数（q），如果（k<100，k++；a[k]=q））；）；a=矢量（k，n，a[n]）；向量排序（a）
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
67、67766767、76767667、6666767777、6667677677、66677776767
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
0,1
|
|
|
评论
|
有18个数字对可以产生这样的素数。(1,0),(7,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,4),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9).
|
|
|
链接
|
|
|
|
数学
|
排序[Flatten[Table[Select[FromDigits/@Permutations[PadRight[{}，2n，{6，7}]]，PrimeQ]，{n，5}]](*哈维·P·戴尔2012年12月3日*）
|
|
|
黄体脂酮素
|
（PARI）/*仅由数字x和y组成的素数，出现频率相同。*/x=6；y=7；d1=x；d2=y；k=0；a=矢量（100）；对于（n=13000，B=二进制（n）；L=长度（B）；s=总和（j=1，长度（B），B[j]）；如果（L%2==0&s==L/2，C=向量（L，n，（d2-d1）*B[n]+d1）；p=替换（Pol（C），x，10）；if（i素数（p），if（k<100，k++；a[k]=p））；D=矢量（L，n，d2-（d2-d1）*B[n]）；q=subst（Pol（D），x，10）；如果（i素数（q），如果（k<100，k++；a[k]=q））；）；a=向量（k，n，a[n]）；向量排序（a）
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
23, 23223323, 32323223, 2222323333, 2223223333, 2232223333, 2232322333, 2232332233, 2323222333, 2332322233, 2333222323, 2333223223, 3223232323, 3232222333, 3232232233, 3232233223, 3232322323, 3323232223, 22222232333333
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
有18个数字对可以产生这样的素数。(1,0),(7,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,4),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9).
|
|
|
链接
|
|
|
|
黄体脂酮素
|
（Python）
从sympy导入isprime
从sympy.utilities.iterables导入multiset_permutations
def auptodigs（最大数字）：
alst=[]
对于范围（2，最大数字+1，2）中的d：
ms=“2”*（d//2）+“3”*（d//2-1）
对于多重置换（ms，d-1）中的p：
t=int（“”.join（p）+“3”）
如果是质数（t）：
附加（t）
返回alst
（PARI）seq（n，d1=2，d2=3）={my（L=列表（））\\安德鲁·霍罗伊德2022年1月11日
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n
|
|
|
作者
|
|
|
|
扩展
|
偏移更改为1，a（19）由修正乔治·菲舍尔2022年1月11日
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
37, 73, 33373777, 33773737, 37373773, 37377337, 73337377, 73337773, 73373737, 73773373, 77337373, 77733373, 3337737737, 3337777337, 3377733773, 3733377377, 3733733777, 3737733773, 3773333777, 3773337377, 3773733737, 3777333773
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
0,1
|
|
|
评论
|
有18个数字对可以产生这样的素数。(1,0),(7,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,4),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9).
|
|
|
链接
|
|
|
|
数学
|
选择[Flatten[Table[FromDigits/@Permutations[Join[Table[3]，{i}]，Table[7，{i{]]，{i，7}]]，PrimeQ]（摘自Harvey Dale）
|
|
|
黄体脂酮素
|
（PARI）/*仅由数字x和y组成的素数，出现频率相同。*/x=3；y=7；d1=x；d2=y；k=0；a=矢量（100）；对于（n=13000，B=二进制（n）；L=长度（B）；s=总和（j=1，长度（B），B[j]）；如果（L%2==0&s==L/2，C=向量（L，n，（d2-d1）*B[n]+d1）；p=替换（Pol（C），x，10）；if（i素数（p），if（k<100，k++；a[k]=p））；D=矢量（L，n，d2-（d2-d1）*B[n]）；q=subst（Pol（D），x，10）；如果（isprime（q），如果（k<100，k++；a[k]=q））；）；a=向量（k，n，a[n]）；向量排序（a）
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.009秒内完成
|
