|
抵消
|
1,2
|
|
评论
|
观察:所有术语都以数字1开头。
相应的记录为:1、2、3、4、5、6、10、11、12、。。。
|
|
链接
|
|
|
示例
|
1008是一个术语,因为A357299型(1008)=10,对应的十个除数是{1、12、14、16、18、112、126、144、168、1008},并且10大于A357299型。
|
|
数学
|
f[n_]:=整数位数[n][1]];s[n_]:=模[{fn=f[n]},除数和[n,1&,f[#]==fn&]];序列={};sm=0;Do[如果[(sn=s[n])>sm,sm=sn;附加到[seq,n]],{n,1,200000}];序列(*阿米拉姆·埃尔达尔2022年9月24日*)
|
|
黄体脂酮素
|
(PARI)f(n)=我的(fd=数字(n)[1]);sumdiv(n,d,数字(d)[1]==fd)\\A357299型
lista(nn)=my(r=0,x,list=list());对于(n=1,nn),如果(x=f(n))>r,则为listput(list,n);r=x););Vec(列表)\\米歇尔·马库斯2022年9月24日
(PARI)小于等于(n)={r=-1;res=List();forfactored(i=1,n,if(numdiv(i[2])>=r,d=除数(i[2]);t=i[1]\10^logint(i[1],10);c=总和(j=1,#d,d[j]\10^ logint(d[j],10)=t);if(c>r,r=c;listput(res,i[1];));res}\\大卫·A·科内斯2022年9月24日
(Python)
从sympy导入除数
从itertools导入计数,islice
定义b(n):f=字符串(n)[0];如果str(d)[0]==f,则返回和(除数(n)中d的1)
def agen():#术语生成器
记录=-1
对于计数(1)中的m:
v=b(米)
如果v>记录:产量m;记录=v
打印(列表(islice(agen(),17))#迈克尔·布拉尼基2022年9月24日
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|