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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A085645号 n个除数以1或9结尾的最小数。 2
1, 9, 63, 99, 441, 693, 5103, 1881, 5733, 4851, 35721, 9009, 194481, 56133, 51597, 27027, 2893401, 63063, 2711943423, 81081, 464373, 392931, 670761, 153153, 2528253, 2139291, 693693, 729729, 18983603961, 567567, 1441237924662543, 459459, 4322241, 31827411, 22754277 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,2
评论
所有a(n)必须在A331029型此外,a(n)不能是2或5的倍数,因为删除这些因子不会改变以1或9结尾的除数-安德鲁·霍罗伊德2020年1月7日
链接
A.斯坦格,除数的多余
维基百科,除数表
例子
63的除数是1、3、7、9、21和63。其中三个以1或9结尾。没有更小的数字满足此条件,因此a(3)=63
数学
tbl=表格[Length[Select[IntegerDigits/@Divisors[i],Last[#]==1| | Last[#]==9&]],{i,50000}];表[第一个[位置[tbl,i]],{i,12}]//展平
模块〔{nn=3*10^6,lst},lst=表〔{n,Count〔Divisitors〔n〕,_?(Mod〔#,10〕==1| | Mod〔#,10〕==9&)〕},{n,nn}〕;表[SelectFirst[lst,#[2]]==k&],{k,18}]][[;;,1]](*程序生成序列的前18个项。*)(*哈维·P·戴尔2024年4月21日*)
黄体脂酮素
(PARI)a(n)={forstep(k=1,oo,2,if(sumdiv(k,d,abs(d%10-5)==4)==n,return(k))}\\安德鲁·霍罗伊德2020年1月7日
(PARI)\\更快的程序:需要列表331029,定义于A331029型
a(n)={my(lim=1);while(1,lim*=10;my(S=lista331029(lim));for(i=1,#S,my(k=S[i]);if(sumdiv(k,d,abs(d%10-5)==4)==n,return(k))}\\安德鲁·霍罗伊德2020年1月7日
交叉参考
囊性纤维变性。A331029型,A331082飞机
关键词
基础,非n
作者
Lekraj Beedassy公司2003年7月11日
扩展
更正和扩展人哈维·P·戴尔2003年7月18日
条款a(17)及以后安德鲁·霍罗伊德2020年1月7日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月19日03:10。包含373492个序列。(在oeis4上运行。)