搜索： a306011-编号：a306011
|
| |
|
|
A306010型
|
| 设S（m）=d（k）/d（1）+…+d（1）/d（k），其中d（1。。d（k）是m的幺正因子；则a（n）是当总和S（m）按递增顺序排列时的数目m。 |
|
+10
4
|
|
|
|
1, 2, 3, 4, 5, 7, 8, 6, 9, 11, 10, 13, 12, 16, 17, 15, 14, 19, 20, 18, 23, 21, 25, 27, 24, 22, 29, 28, 31, 32, 26, 33, 37, 35, 36, 41, 40, 34, 43, 30, 39, 47, 44, 45, 38, 49, 53, 48, 52, 51, 46, 55, 56, 59, 42, 61, 50, 57, 64, 63, 67, 54, 65, 71, 68, 58, 73
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
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}，使得（a（n））的前8项是1，2，3，4，5，7，8，6。
|
|
|
数学
|
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，Last]
w=表[v[[n]][2]，{n，1，z}]；
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A306012型
|
| 设S（m）=d（k）/d（1）+…+d（1）/d（k），其中d（1。。d（k）是m的幺正因子；则当所有数字S（m）按递增顺序排列时，a（n）是S（m）的分母。 |
|
+10
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，Last]
v1=表格[v[[n]][[1]，{n，1，z}](*2010年3月*)
w=表[v[[n]][2]，{n，1，z}]；
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A306013型
|
| 设P（m）是m的酉除数的乘积；则a（n）是所有数字P（m）按递增顺序排列时P（n）的位置。 |
|
+10
0
|
|
|
|
1, 2, 3, 4, 5, 7, 8, 9, 11, 13, 16, 17, 19, 23, 25, 27, 29, 31, 32, 36, 37, 41, 43, 47, 49, 53, 59, 61, 64, 67, 71, 73, 79, 81, 83, 89, 97, 100, 144, 196, 225, 324, 400, 441, 484, 576, 676, 784, 1089, 1156, 1225, 1296, 1444, 1521, 1600, 1936, 2025, 2116
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
|
|
|
链接
|
|
|
|
数学
|
z=100；r[n_]：=选择[Divisors[n]，GCD[#，n/#]==1&]；
k[n_]：=长度[r[n]]；
表[r[n]，{n，1，z}]
a[n_]：=应用[次数，r[n]]
u=表[a[n]，{n，1，z}]
排序[u]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.004秒内完成
|
