|
| |
| |
|
|
|
1, 2, 4, 6, 8, 12, 16, 18, 20, 24, 28, 30, 32, 36, 40, 42, 48, 54, 56, 60, 64, 66, 72, 80, 84, 88, 90, 96, 100, 104, 108, 112, 120, 126, 128, 132, 140, 144, 150, 156, 160, 162, 168, 176, 180, 192, 196, 198, 200, 204, 208, 210, 216, 220, 224, 228, 234, 240, 252, 256
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
也就是说，如果一个数的除数是按递增顺序列出的，那么相邻的除数之比最多为2。这个序列中唯一的奇数是1。每个术语似乎都是一个实际数字(A005153号). 这里没有的第一个实际数字是78。
设p1^e1*p2^e2*…*pr ^er是一个数的素数因式分解，素数p1<p2<…<pr和ek>0。那么这个数字就是这个序列当且仅当pk<=2*Product_{j<k}p_j^e_j。这个条件类似于实际数字的条件，但比实际数字的情况更严格。
由Terry Tao领导的polymath8项目将这些数字称为“2可分”。一般来说，如果n的除数增加了y的一个因子或更小，或者等价地，如果对于每一个R<=R<=n的R，区间[R/y，R]中都有一个除数，那么n就是y密可除的。他们用这个来弱化n是y-光滑的条件-大卫·S·梅茨勒2013年7月2日
这与数字k的性质相同，即sigma（k）的对称表示只有一部分吗？如果不是，这些序列的第一个不同之处是什么？（参见。237593加元)-奥马尔·波尔2014年3月6日
Saias（1997）将这些术语称为“2-义数”，并证明了如果N（x）是不超过x的项数，则存在两个正常数c1和c2，使得c1*x/log_2（x）<=N-阿米拉姆·埃尔达尔，2020年7月23日
Weingartner（20152019）表明，N（x）=c*x/log（x）+O（x/（log（x-安德烈亚斯·温加特纳2021年6月22日
|
|
|
链接
|
埃里克·赛亚斯，整除数稠密1《数论杂志》，第62卷，第1期（1997年），第163-191页。
安德烈亚斯·温加特纳，实数与除数分布《数学季刊》，第66卷，第2期（2015年），第743-758页；arXiv预印本，arXiv:1405.2585[math.NT]，2014-2015年。
|
|
|
配方奶粉
|
a（n）=C*n*log（n*log（n））+O（n），其中C=0.816439…（见注释）-安德烈亚斯·温加特纳2021年6月23日
|
|
|
例子
|
12的除数是1、2、3、4、6、12。相邻除数之比为2、3/2、4/3、3/2和2，均<=2。因此，12在这个序列中。
第一象限中sigma（6）=12的对称表示如下：
年
.
._ _ _ _
|_ _ _ |_
。||_
. |_ _ |
. | |
. | |
. . . . . |_| . . x个
.
6在序列中，因为sigma（6）=12的对称表示只有一部分。第六排237593加元是[4,1,1,1,1,4]和第五行237593加元是[3，2，2，3]，因此在两个对称Dyck路径之间只有一个区域（或部分）大小为12。
70不在序列中，因为sigma（70）=144的对称表示有三个部分。第70排237593加元是[36、12、6、4、3、2、2、1、1、1,1、2、2,2、3、4、6、12、36]和第69行237593加元是[35，12，7，4，2，3，1，2，1，1，1，1，1，2，1，3，2，4，7，12，35]，因此在两个对称的Dyck路径之间存在大小为[54，36，54]的三个区域（或部分）。（结束）
|
|
|
MAPLE公司
|
a： =proc（）选项记住；局部k；从1+`if`（n=1,0，
a（n-1）），而（l->ormap（x->x，[seq（l[i]>l[i-1]*2，i=2。。
nops（l）））（sort（[（numtheory[除数]（k））[]]））do od；k个
结束时间：
|
|
|
数学
|
OK[n_]：=模[{d=Divisors[n]}，And@@（#<=2&/@（Rest[d]/Most[d]））]；选择[范围[1000]，确定]
dif2Q[n_]：=AllTrue[#[[2]]/#[[1]]&/@Partition[Divisors[n]，2，1]，#<=2&]；选择[Range[300]，dif2Q]（*需要Mathematica版本10或更高版本*）(*哈维·P·戴尔2020年11月29日*）
|
|
|
黄体脂酮素
|
（哈斯克尔）
a174973 n=a174973_列表！！（n-1）
a174973_list=过滤器f[1..]，其中
f n=所有（<=0）$zipWith（-）（尾部div）（map（*2）div）
其中divs=a027750_row'n
（PARI）是（n）=my（d=除数（n））；对于（i=2，#d，如果（d[i]>2*d[i-1]，返回（0））；1 \\查尔斯·格里特豪斯四世2013年7月6日
（岩浆）[1..260]|对于[1..#除数（k）-1]|d[i+1]/d[i]le 2中的所有{i:i，其中d是除数（k）}]//马吕斯·A·伯蒂2020年1月9日
（Python）
从sympy导入除数
定义正常（n）：
d=除数（n）
返回所有（对于范围（1，len（d））中的i，d[i]/d[i-1]<=2）
打印（列表（过滤器（正常，范围（1257）））#迈克尔·布拉尼基2021年6月22日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
