显示找到的2个结果中的1-2个。
第页1
1, 2, 5, 13, 26, 29, 37, 41, 61, 73, 74, 101, 109, 113, 122, 137, 146, 157, 173, 181, 193, 218, 229, 257, 277, 281, 313, 314, 317, 353, 362, 373, 386, 389, 397, 401, 409, 421, 433, 457, 458, 461, 509, 541, 554, 569, 601, 613, 617, 626, 641, 653, 661, 673, 677
例子
对于n=13,西格玛(13)=2*7=14;
对于n=26,σ(26)=1+2+13+26=42=2*3*7。
对于n=277(素数),σ(n)=278=2*139是平方自由的。
数学
选择[Range[1000],AllTrue[{#,DivisiorSigma[1,#]},SquareFreeQ]&](*使用Mathematica版本10*中的函数AllTrue)(*哈维·P·戴尔2014年8月9日*)
黄体脂酮素
(PARI){n=0;对于(m=1,10^9,如果(abs(moebius(m))==1&abs(moebius(sigma(m)))==1,写入(“b065301.txt”,n++,“”,m);如果(n=1000,return))}\\哈里·史密斯2009年10月15日
(Python)
从symy导入divisorsigma
从sympy.theory.factor导入核心
def issquarefree(n):返回核心(n)==n
打印([n代表范围(11001)中的n,如果无发行(n)和无发行(除数_西格玛(n,1))])#因德拉尼尔·戈什2017年3月19日
非平方自由数k,使得sigma(k)是平方自由的。
+10 1
4, 8, 9, 16, 18, 20, 25, 36, 45, 49, 50, 64, 72, 80, 100, 104, 116, 117, 121, 128, 144, 148, 169, 180, 196, 200, 208, 225, 234, 242, 244, 256, 261, 289, 292, 296, 320, 325, 333, 361, 369, 404, 436, 441, 450, 452, 464, 488, 512, 529, 548, 549, 576, 578, 584, 592
例子
k=45=3*3*5,σ(45)=78=2*3*13。
MAPLE公司
过滤器:=n->不是numtheory:-issqrfree(n)和numtheori:-issqrfree
搜索在0.006秒内完成
查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。
许可协议、使用条款、隐私政策。.
上次修改时间:2024年9月23日01:59 EDT。包含376140个序列。(在oeis4上运行。)
|