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

 

标志

年终呼吁:请向OEIS基金会捐款支持OEI的持续开发和维护。我们已经59年了,我们有超过358000个序列,我们已经跨越了10300条引文(通常说“感谢OEI的发现”)。

其他给予方式
提示
(问候来自整数序列在线百科全书!)
A147300型 a(n)=参数m的最小值,使得函数rad(m*n*(n-m))具有最小值n=2,3,4,…,0<m<n其中函数rad(k)(也称为根(k))是k的不同素数的乘积。 11
1、1、1、1、1、1、1、1、1、1、1、1、2、1、1、1、1、1、1、1、1、1、1、1、1、1、1、1、7、1、1、1、1、2、2、1、1、4、5、1、9、3、1、1、1、11、7、1、9、1、16、1、1、1、1、1、1、1、1、1、1、1、1、1、1、1、1、1、1、1、1、1、1、1、1、3、1、1、1、1、1、1、1、1、1、1、1、1、1、1、7、7、1、1、1、1、1、1、1、1、1 13,1,4,1,1,1,2,1,4,5,23,7,8,1,27,11,1,13,14,1,1,17,1,1 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

2,10个

评论

函数rad(k)用于ABC猜想的应用。

关于函数rad(mn(n-m))的最小值,请参见A147298号.

关于函数rad(mn(n-m))的最大值,请参见A147299号.

对于rad(m*n*(n-m))达到最小值的数值m,请参见A147300型.

对于rad(m*n*(n-m))达到最大值的数值m,请参见A147301.

对于每个值log(n)/log的序列(A147298号(n) )达到记录参见A147302号.

链接

n=2..100的n,a(n)表。

数学

logmax=0;aa={};bb={};cc={};dd={};ee={};ff={};gg\={};Do[min=10^100;max=0;ile=0;Do[If[GCD[m,n,n-m]==1,ile=ile+1;s=m n(n-m);k=因数积分[s];g=1;Do[g=gk[[p]][[1]],{p,1,长度[k]}];如果[g>max,max=g;mmax=m];如果[g<min,min=g;mmin=m]],{m,1,n-1}];附录[aa,min];附录[bb,max];附录[cc,mmax];附录[dd,mmin];附录[gg,ile];如果[(Log[n]/Log[min])>logmax,则logmax=(Log[n]/Log[min]);追加到[ee,{N[logmax],N,mmin,min,mmax,max}];打印[{N[logmax],N,mmin,min,mmax,max}];附录[ff,n]],{n,2,129}];详细设计(*雅辛斯基*)

交叉引用

囊性纤维变性。A085152型,A085153号,A147298号-A147307型.

上下文顺序:邮编:A177121 A329314飞机 A092931号*A346481型 A240228号 A110503号

相邻序列:A147297号 A147298号 A147299号*A147301 A147302号 A147303号

关键字

作者

雅辛斯基2008年11月5日

状态

经核准的

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

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

上次修改时间:2022年12月3日09:50。包含358517个序列。(运行在oeis4上。)