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

 

标志
提示
(来自的问候整数序列在线百科全书!)
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]];
一个(*罗伯特·普莱斯2018年11月12日*)
黄体脂酮素
(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=“,”)
阿芬德(13)#迈克尔·布拉尼基2022年1月14日
交叉参考
关键词
非n,更多,基础
作者
迈克尔·克莱伯2003年2月28日
扩展
更多术语来自约翰·莱曼2004年12月14日
还有11个来自瑞恩·普罗珀2005年7月19日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月18日15:05。包含371780个序列。(在oeis4上运行。)