OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A306012型 设S(m)=d(k)/d(1)+…+d(1)/d(k),其中d(1。。d(k)是m的幺正因子;则当所有数字S(m)按递增顺序排列时,a(n)是S(m)的分母。 4
1, 2, 3, 4, 5, 7, 8, 3, 9, 11, 1, 13, 6, 16, 17, 3, 7, 19, 10, 9, 23, 21, 25, 27, 12, 11, 29, 14, 31, 32, 13, 33, 37, 7, 18, 41, 4, 17, 43, 3, 39, 47, 22, 45, 19, 49, 53, 24, 26, 51, 23, 55, 28, 59, 21, 61, 5, 57, 64, 63, 67, 27, 1, 71, 2, 29, 73, 3, 36, 69 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
链接
例子
前8对{m,S(m)}分别是{1,1},{2,5/2},}3,10/3},{4,17/4},◄5,26/5},}6,25/3},▄{7,50/7},]{8,65/8}。当数字S(m)按递增顺序排列时,这些对是{1,1},{2,5/2},}3,10/3},{4,17/4},◄5,26/5},}7,50/7},]{8,65/8},▄{6,25/3},因此前8个分母是1,2,3,4,5,7,8,3。
数学
z=100;r[n_]:=选择[Divisors[n],GCD[#,n/#]==1&];
k[n_]:=长度[r[n]];
t[n_]:=表[r[n][[k[n]+1-i]]/r[n][[k[1]+i-1]],{i,1,k[n]};
s=表[{n,总计[t[n]]},{n,1,z}]
v=排序依据[s,最后]
v1=表格[v[[n]][[1],{n,1,z}](*A306010型*)
w=表[v[[n]][2],{n,1,z}];
分子[w](*A306011型*)
分母[w](*A306012型*)
交叉参考
关键词
非n
作者
克拉克·金伯利2018年6月16日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月28日19:24。包含372919个序列。(在oeis4上运行。)