|
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))-Antti Karttunen公司2014年12月18日
散点图中各点的可见线斜率分别为1/2、1/3、1/5、1/7。。。(质数的倒数)-穆萨·纳西尔2022年6月19日
|
|
链接
|
Eric Weistein的《数学世界》,适当除数.
|
|
配方奶粉
|
其他身份和观察结果:
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)
来自症状输入因子
定义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型,A286477型,A300236型,A302025型,A302026型,A302032型,A302042型,A325563型,A325567型.
|
|
关键词
|
非n,容易的,美好的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|