|
|
A032742号 |
| a(1)=1;对于n>1,a(n)=n的最大真除数(也就是说,对于n>1,n的最大除数d在1<=d<n范围内)。 |
|
245
|
|
|
1、1、1、2、1、3、1、4、3、5、1、6、1、7、5、8、1、9、1、10、7、11、1、12、5、13、9、14、1、15、1、16、11、17、7、18、1、19、13、20、1、21、1、22、15、23、1、24、7、25、17、26、1、27、11、28、19、29、1、30、1、31、21、32、13、33、1、34、23、35、1、36、1、37、25,38,11,39,1,40
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4
|
|
评论
|
似乎a(n)=Max_{j=n+1..2n-1}gcd(n,j)-拉博斯·埃利默2002年5月22日
这是正确的:范围[n+1,2n-1]中没有整数的除数是n,但肯定会出现n的最大真除数的至少一个倍数(例如,如果是n/2,那么是n+(n/2))-安蒂·卡图恩2014年12月18日
散点图中各点的可见线斜率分别为1/2、1/3、1/5、1/7。。。(质数的倒数)-穆萨·纳西尔2022年6月19日
|
|
链接
|
|
|
配方奶粉
|
其他身份和观察结果:
a(m*n)=最大值(m*a(n),n*a(m))-罗伯特·伊斯雷尔2014年12月18日
(结束)
|
|
MAPLE公司
|
A032742号:=proc(n)选项记忆;如果n=1,则为1;else数理论[除数](n)减去{n};最大值(op(%));结束条件:;结束进程:#R.J.马塔尔,2011年6月13日
1,seq(n/min(数值理论:-系数集(n)),n=2..1000)#罗伯特·伊斯雷尔2014年12月18日
|
|
数学
|
联接[{1},除数[#][[-2]]&/@Range[2,80]](*哈维·P·戴尔2011年11月29日*)
a[n_]:=n/FactorInteger[n][[1,1]];数组[a,100](*阿米拉姆·埃尔达尔2020年11月26日*)
表[Which[n==1,1,PrimeQ[n],1,True,Divisors[n][[2]]],{n,80}](*哈维·P·戴尔2022年2月2日*)
|
|
黄体脂酮素
|
(PARI)a(n)=如果(n==1,1,n/系数(n)[1,1])\\查尔斯·格里特豪斯四世2011年6月15日
(哈斯克尔)
a032742 n=n`div`a020639 n--莱因哈德·祖姆凯勒2012年10月3日
(Python)
来自sympy导入因子
定义a(n):如果n==1,则返回1,否则为n//min(因子(n))
打印([a(n)代表范围(1,81)中的n)]#迈克尔·布拉尼基2022年6月21日
|
|
交叉参考
|
囊性纤维变性。A002110号,A002808年,A005867号,A006530号,A008578号,A020639号,A032741号,A003961号,A052126号,A054576号,A055396号,A060681号,A068319号,A063928号,A130064型,A246277号,A250245型,A250246型,A276085型,A276086型,A276151型,286477元,A300236型,32025年3月,A302026型,A302032型,A302042型,A325563型,A325567型.
|
|
关键词
|
非n,容易的,美好的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|
|
|