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

 

标志
提示
(问候来自整数序列在线百科全书!)
A109687号 以n的位数结尾且正好有n个素数因子的最小数(以重数计数)。 1
11、22、63、24、405、96、2187、1408、124659、65610、4271211、38912、37614213、40507614、326836215、802816、10010754117、2496709818、23202182619、14417920、8868054999321、76709256822、147490981623、25165824、3922632451125 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,1

链接

n=1的n,a(n)表。。25

例子

a(5)=405,因为405=3*3*3*5(5个因子),以5结尾,是最小的此类数

黄体脂酮素

程序来自大卫·瓦瑟曼2008年9月19日:(开始)

(PARI)位数(n,基数=10)=局部(d);如果(n==0,返回(1));基底(d+1)/log);而(n>=基^d,d++);而(n<base^(d-1),d--);d;

{

a(n)=

本地(r、num2、num5、d、M、pLeft、mainP、searchP、固定、x、rNeeded、y、nextP);

r=n;

d=数字计数(n);

当(num2<d&!(r%2)时,

num2++;

r=r/2

);

当(num5<d&!(r%5)时,

num5++;

r=r/5

);

M=10^d/2^num2/5^num5;

pLeft=n-num2-num5;

mainP=if(num2==d,2,3);

searchP=最小值(4,pLeft);

固定=2^num2*5^num5;

x=mainP^(pLeft-searchP);

rNeeded=升力(Mod(r,M)/Mod(x,M));

while(bigomega(needed)!=搜索P,

rNeeded+=米

);

y=固定*x*rNeeded;

如果(mainP==2,

nextP=3,

nextP=if(num5==d,5,7)

);

而(searchP<pLeft&&fixed*x*nextP^(1+searchP)/mainP<y,

searchP++;

x/=主管道

);

rNeeded=升力(Mod(r,M)/Mod(x,M));

while(bigomega(needed)!=搜索P,

rNeeded+=米

);

返回(固定*x*rNeeded);

}(结束)

交叉引用

囊性纤维变性。A109665号[来自大卫·瓦瑟曼2008年9月30日]

上下文顺序:A070069号 邮编:A178664 邮编:A2926*A225361号 A111696 A047902号

相邻序列:A109684号 A109685号 A109686电话*A109688号 A109689号 A109690号

关键字

基础,

作者

埃里希·弗里德曼2005年8月7日

扩展

更多条款来自大卫·瓦瑟曼2008年9月18日

状态

经核准的

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

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

上次修改时间:2022年1月19日23:39。包含350467个序列。(运行在oeis4上。)