搜索： a099318-编号：a099319
|
| |
| |
|
|
|
1, 2, 4, 6, 12, 16, 24, 36, 48, 60, 64, 120, 144, 180, 192, 240, 360, 576, 720, 840, 900, 960, 1024, 1260, 1296, 1680, 2520, 2880, 3072, 3600, 4096, 5040, 5184, 6300, 6480, 6720, 7560, 9216, 10080, 12288, 14400, 15120, 15360, 20160, 25200, 25920, 27720, 32400, 36864, 44100
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
|
|
|
参考文献
|
J.Roberts，《整数的诱惑》，数学。美国协会，1992年，第86页。
N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。
|
|
|
链接
|
J.Roberts，整数的诱惑，第81、86页的带注释扫描件，附注释。
Anna K.Savvopoulou和Christopher M.Wedrychowicz，关于具有给定除数的最小数《拉马努扬杂志》，2015年，第37卷，第51-64页。
|
|
|
MAPLE公司
|
对于n从1到10^5 do
t： =理论数量：-τ（n）；
如果未赋值（B[t]），则B[t]:=n fi；
日期：
|
|
|
数学
|
|
|
|
程序
|
（PARI）对于（s=1，10^6，如果（abs（prod（i=1，s-1，numdiv（i）-numdiv（s）））>0，打印1（s，“，”））
（PARI）是（n）=my（d=numdiv（n））；对于（i=1，n-1，如果（numdiv（i）==d，返回（0）））；1个\\查尔斯·格里特豪斯四世，2013年2月20日
（PARI）
A283980型（n，f=因子（n））=prod（i=1，#f~，my（p=f[i，1]）；如果（p==2,6，下一素数（p+1））^f[i，2]）
A025487do（e）=我的（v=列表（[1,2]），i=2，u=2^e，t）；当（v[i]！=u时，如果（2*v[i]<=u，则列表输入（v，2*v[i]）；t吨=A283980型（v[i]）；如果（t<=u，列表输入（v，t））；i++）；设置（v）
winnow（v，lim=v[#v]）=my（m=Map（），u=List（））；对于（i=1，#v，如果（v[i]>lim，break）；我的（t=numdiv（v[i]））；如果（！mapisdefined（m，t），则mapput（m，t，0）；列表（u，v[i]））；m=0；Vec（u）（车辆）
列表（lim）=winnow（A025487do（logint（lim\1-1,2）+1），lim）\\查尔斯·格里特豪斯四世2022年11月17日
（哈斯克尔）
a007416 n=a007416_列表！！（n-1）
a007416_list=f 1[]其中
f x ts=如果tau`elem`ts，则f（x+1）ts其他x:f（x+1）（tau:ts）
其中tau=a000005'x
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,容易的,美好的
|
|
|
作者
|
|
|
|
状态
|
已批准
|
| |
|
搜索在0.003秒内完成
|
