|
|
A096236号 |
| n位base-3可删除素数的个数。 |
|
2
|
|
|
1, 2, 4, 7, 13, 24, 38, 72, 122, 226, 400, 684, 1246, 2381, 4384, 8330, 15839, 30617, 58764, 113987, 221994, 434498, 852036, 1673320, 3296641, 6509179
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
素数p是一个以b为基数的可删除素数,如果它具有删除某些数字后会留下空字符串或另一个可删除的素数的特性。“数字”是指以b为基数的数字。
删除数字不能在新字符串中保留任何前导零。例如,不允许在2003年删除2以获得003。
|
|
链接
|
|
|
数学
|
b=3;a={1};d={2};
对于[n=2,n<=10,n++,
p=选择[Range[b^(n-1),b^n-1],PrimeQ[#]&];
ct=0;
对于[i=1,i<=长度[p],i++,
c=整数位数[p[i]],b];
对于[j=1,j<=n,j++,
t=删除[c,j];
如果[t[[1]]==0,则继续[]];
如果[MemberQ[d,FromDigits[t,b]],AppendTo[d,p[i]]];ct++;
中断[]]];
附录[a,ct]];
|
|
黄体脂酮素
|
(Python)
从sympy导入isprime
从sympy.theory.digits导入数字
定义正常(n,prevset,base=3):
如果不是isprime(n):返回False
s=“”.join(以数字(n,base)[1:]表示d的str(d))
si=(s[:i]+s[i+1:]对于范围内的i(len(s)))
对于si中的t,在prevset中返回任意(t[0]!=“0”和int(t,base))
定义afind(术语):
s、 snxt,base={2},set(),3
打印(长度,结束=“,”)
对于范围(2,项+1)中的n:
对于范围内的i(基数**(n-1),基数**n):
如果正常(i,s):
文本添加(i)
s、 snxt=snxt,集()
打印(len(s),end=“,”)
|
|
交叉参考
|
|
|
关键词
|
非n,更多,基础
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|