OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。

登录

OEIS由OEIS基金会的许多慷慨捐赠者.

 

提示 （来自的问候整数序列在线百科全书!) A284229型 a（n）是最小的k，因此A073802型（k） =个。 0 1, 10, 12, 6, 336, 24, 5952, 168, 792, 496, 666624, 270, 10924032, 6720, 7344, 120, 3757637632, 4284, 45091651584, 2160, 79488, 1820672, 11544784011264, 672, 298080, 29331456, 106200, 13440, 53620880789471232, 10080, 1501384662105194496, 6552, 7022592, 7515275264 (列表;图表;参考;听;历史;文本;内部格式) 抵消 1,2 评论 只有1作为除数且满足sigma（k）/d_i为整数条件的复合数是达菲数(A003624号). 替代定义：最小k，使d（gcd（k，sigma（k））=n-乔瓦尼·雷斯塔2017年3月23日 链接 n=1..34时的n，a（n）表。 例子 12的除数是1，2，3，4，6，12，sigma（12）=28。然后： 1) 28 / 1 = 28; 2) 28 / 2 = 14; 3) 28 / 4 = 7; 12是具有此属性的最小数字。因此a（3）=12。 MAPLE公司 使用（数字理论）：P:=proc（q）局部k，n；对于k从1到q do 对于从1到q的n，如果tau（gcd（n，sigma（n）））=k，则 打印（n）；断裂；fi；od；od；结束：P（10^9）； 数学 TakeWhile[#，#>0&]和@Table[If[KeyExistsQ[#，n]，First@Lookup[#，n]，-1]，{n，Max@Keys@#}]和@KeySort@PositionIndex@Table[CdivisorSum[k，1&，IntegerQ[DivisorSigma[1，k]/#]&]，{k，10^6}]（*每个名称，版本10或*） TakeWhile[#，#>0&]和@Table[If[KeyExistsQ[#，n]，First@Lookup[#，n]，-1]，{n，Max@Keys@#}]和@KeySort@PositionIndex@Table[CivisorSigma[0，GCD[k，DivisorSigma[1，k]]，{k，10^7}]（*更快，版本10，迈克尔·德弗利格2017年3月24日*） 黄体脂酮素 （PARI）nb（n）=我的（s=西格玛（n））；sumdiv（n，d，（s%d）==0）； a（n）=k=1；而（nb（k）！=n、 k++）；k\\米歇尔·马库斯2017年3月24日 交叉参考 囊性纤维变性。A000203号,A003624号,A073802型. 上下文中的序列：A342356飞机 A338290型 A365197型*A078285号 A303151型 A103618号 相邻序列：A284226号 A284227号 A284228型*A284230型 A284231型 A284232型 关键词 非n 作者 保罗·拉瓦2017年3月23日 扩展 从a（22）到a（34）乔瓦尼·雷斯塔2017年3月23日 提议人姓名米歇尔·马库斯2017年3月24日 状态 经核准的

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

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

上次修改时间：美国东部夏令时2024年6月12日01:17。包含373320个序列。（在oeis4上运行。）