OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者

 

徽标
提示
(来自的问候整数序列在线百科全书!)
A368930型 a(n)是最小的k,它在正好n个碱基中不能被任何数字整除,或者如果没有这样的k,则为0。 1
1, 11, 27, 17, 33, 70, 23, 29, 51, 37, 92, 41, 74, 43, 82, 65, 69, 47, 53, 136, 106, 87, 59, 67, 71, 154, 172, 118, 111, 79, 146, 83, 123, 378, 89, 97, 153, 212, 125, 101, 103, 121, 119, 107, 113, 225, 250, 127, 159, 206, 202, 218, 155, 183, 143, 131, 137, 139, 161, 1020, 151, 169, 157, 149, 286 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,2
评论
a(n)是最小的k(如果存在),因此A055240号(k) =个。
对于n=159、208、266、267、328、405、484、492……,似乎a(n)=0。。。。
a文件中0的条目是推测的:如果它们不是0,则它们>35000。
链接
罗伯特·伊斯雷尔,n=1..1000时的n,a(n)表。0的条目是推测的。
例子
a(3)=17,因为只有3个基数,其中17不能被任何数字整除:这些基数是5、6、7,因为17=325=256=237,17不能被这些基数中的任何数字2、3和5整除。每隔一个基数,17至少可以被它的一个数字整除;例如,在基数10中,17可以被1整除。17是第一个有3个这样的基数的数字。
MAPLE公司
f: =程序(n)
nop(选择(b->非ormap(d->d<>0且n mod d=0,转换(n,base,b)),[$3..(n-1)/2])
结束进程:
五: =数组(0..100):计数:=0:
当计数<101 do时,n从1开始
v: =f(n);
如果v<=100且v[v]=0,则v[v]:=n;计数:=计数+1 fi;
日期:
转换(V,列表);
数学
isDiv[k_,b_]:=模块[{d},d=整数位数[k,b];或@@(Mod[k,#]==0&/@DeleteCase[d,0])];
co[k_]:=co[k]=模[{c=0,b=2},While[b<=k,If[Not[isDiv[k,b]],c++];b++];c] ;
a[n_]:=a[n]=模块[{k=1},而[co[k]!=n、 k++;];k] ;
表[a[n],{n,0,64}](*罗伯特·P·麦肯2024年1月10日*)
黄体脂酮素
(Python)
来自itertools导入计数,islice
从sympy.theory.factor导入数字
定义代理():
adict,n=dict(),0
对于计数(1)中的k:
v=总和(1代表范围(2,k)中的i,如果全部(d==0或k%d代表数字(k,i)[1:]))
如果v不在adict中:adict[v]=k
而adict中的n:生成adict[n];n+=1
打印(列表(islice(agen(),65))#迈克尔·布拉尼基2024年1月10日
交叉参考
囊性纤维变性。A055240号
关键词
非n,基础
作者
状态
经核准的

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

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

上次修改时间:2024年5月20日15:51 EDT。包含372717个序列。(在oeis4上运行。)