显示找到的54个结果中的1-10个。
0, 1, 1, -7, 4, 4, 5, 5, -20, 9, 6, -10, 9, 12, 13, -33, 14, -11, 17, 9, 17, 17, 17, 18, -9, 22, 5, 6, 28, 28, 14, -23, 23, 31, 33, -283, 27, 36, 31, 37, 34, 38, 41, -11, 16, 40, 39, -50, -36, 16, 45, 8, 47, 32, 50, 50, 53, 57, 30, 38, 48, 45, 5, -1027, 61, 56, 63, 35, 57, 68, 40, -15, 70, 64, 7, 54, 67, 70, 69, 31
黄体脂酮素
(平价)
A003961号(n) =我的(f=系数(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));factorback(f);\\发件人A003961号
A064989号(n) ={my(f);f=因子(n);如果(n>1&&f[1,1]==2),f[1,2]=0);对于(i=1,#f~,f[i,1]=precprime(f[i、1]-1));因子回退(f)};
2, 3, 5, 6, 7, 8, 10, 11, 13, 14, 15, 17, 19, 20, 21, 22, 23, 24, 26, 27, 28, 29, 30, 31, 33, 34, 35, 37, 38, 39, 40, 41, 42, 43, 45, 46, 47, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 65, 66, 67, 68, 69, 70, 71, 73, 74, 75, 76, 77, 78, 79, 80, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 97
评论
术语也出现在A337386飞机分别是:120、240、360、420、480、504、540、600、630。。。
数学
f1[2,e_]:=1;f1[p_,e_]:=下一素数[p,-1]^e;s1[1]=1;s1[n_]:=倍@@f1@@@FactorInteger[n];f2[p_,e_]:=下一素数[p]^e;s2[1]=1;s2[n_]:=倍@@f2@@FactorInteger[n];选择[Range[100],s1[DivisorSigma[1,s2[#]]]<#&](*阿米拉姆·埃尔达尔2021年11月4日*)
黄体脂酮素
(平价)
A003961号(n) =我的(f=系数(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));factorback(f);\\发件人A003961号
A064989号(n) ={my(f);f=因子(n);如果(n>1&&f[1,1]==2),f[1,2]=0);对于(i=1,#f~,f[i,1]=precprime(f[i、1]-1));因子回退(f)};
交叉参考
囊性纤维变性。A000203号,A003961号,A003973号,A006039号,A027687号,A064989号,A326042型,A336702型,A337386飞机,A347383飞机,A348741型,A348748飞机(相应的奇数)。
1, 1, 2, 11, 1, 1, 2, 3, 29, 1, 5, 11, 4, 1, 2, 49, 3, 29, 2, 11, 4, 5, 6, 1, 34, 2, 22, 11, 1, 1, 17, 55, 10, 3, 2, 319, 10, 1, 8, 3, 7, 2, 2, 5, 29, 3, 8, 49, 85, 17, 2, 11, 6, 11, 1, 3, 4, 1, 29, 11, 13, 17, 58, 1091, 4, 5, 4, 33, 4, 1, 31, 29, 3, 5, 68, 11, 10, 4, 10, 49, 469, 7, 12, 11, 3, 1, 2, 15, 25, 29, 8
数学
f1[2,e_]:=1;f1[p_,e_]:=下一素数[p,-1]^e;s[n_]:=倍@@f1@@@FactorInteger[n];f[p_,e_]:=s[((q=下一素数[p])^(e+1)-1)/(q-1)];s2[1]=1;s2[n_]:=倍@@f@@FactorInteger[n];a[n]:=(sn=s2[n])/GCD[n,sn];数组[a,100](*阿米拉姆·埃尔达尔2021年11月5日*)
黄体脂酮素
(平价)
A003961号(n) =我的(f=系数(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));factorback(f);\\发件人A003961号
A064989号(n) ={my(f);f=因子(n);如果(n>1&&f[1,1]==2),f[1,2]=0);对于(i=1,#f~,f[i,1]=precprime(f[i、1]-1));因子回退(f)};
4, 9, 12, 16, 18, 25, 32, 36, 44, 48, 49, 64, 72, 81, 96, 99, 100, 108, 124, 144, 147, 162, 169, 176, 180, 192, 196, 225, 236, 243, 252, 256, 279, 284, 288, 300, 320, 324, 361, 372, 396, 400, 405, 432, 441, 448, 450, 468, 484, 486, 496, 507, 512, 529, 531, 567, 576, 588, 604, 612, 625, 639, 648, 675, 676, 700, 704
评论
术语也出现在A337386飞机是:180、300、720、900、960、1008、1200、1440、1620、1800、2016、2400。。。
数学
f1[2,e_]:=1;f1[p_,e_]:=下一素数[p,-1]^e;s1[1]=1;s1[n_]:=倍@@f1@@@FactorInteger[n];f2[p_,e_]:=下一个素数[p]^e;s2[1]=1;s2[n_]:=倍@@f2@@FactorInteger[n];选择[Range[700],s1[DivisorSigma[1,s2[#]]]>#&](*阿米拉姆·埃尔达尔2021年11月4日*)
黄体脂酮素
(平价)
A003961号(n) =我的(f=系数(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));factorback(f);\\发件人A003961号
A064989号(n) ={my(f);f=因子(n);如果(n>1&&f[1,1]==2),f[1,2]=0);对于(i=1,#f~,f[i,1]=precprime(f[i、1]-1));因子回退(f)};
0, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1
黄体脂酮素
(平价)
A003961号(n) =我的(f=系数(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));factorback(f);\\发件人A003961号
A064989号(n) ={my(f);f=因子(n);如果(n>1&&f[1,1]==2),f[1,2]=0);对于(i=1,#f~,f[i,1]=precprime(f[i、1]-1));因子回退(f)};
1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 6, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 11, 1, 2, 1, 2, 1, 2, 3, 4, 1, 2, 5, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 1, 3, 2, 1, 3, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 1, 4, 1, 2, 1, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 1, 1, 2, 1, 6, 1, 4, 1
数学
f1[2,e_]:=1;f1[p_,e_]:=下一素数[p,-1]^e;s[n_]:=倍@@f1@@@FactorInteger[n];f[p_,e_]:=s[((q=下一素数[p])^(e+1)-1)/(q-1)];s2[1]=1;s2[n_]:=倍@@f@@FactorInteger[n];a[n_]:=GCD[n,s2[n]];数组[a,100](*阿米拉姆·埃尔达尔2021年11月5日*)
黄体脂酮素
(平价)
A003961号(n) =我的(f=系数(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));factorback(f);\\发件人A003961号
A064989号(n) ={my(f);f=因子(n);如果(n>1&&f[1,1]==2),f[1,2]=0);对于(i=1,#f~,f[i,1]=precprime(f[i、1]-1));因子回退(f)};
1, 2, 3, 4, 5, 3, 7, 8, 9, 10, 11, 6, 13, 7, 15, 16, 17, 18, 19, 20, 21, 22, 23, 4, 25, 13, 27, 14, 29, 15, 31, 32, 33, 34, 35, 36, 37, 19, 39, 40, 41, 21, 43, 4, 45, 23, 47, 24, 49, 25, 17, 13, 53, 27, 11, 28, 57, 58, 59, 30, 61, 62, 63, 64, 65, 33, 67, 68, 23, 35, 71, 24, 73, 37, 75, 38, 77, 39, 79, 80, 81, 82
数学
f1[2,e_]:=1;f1[p_,e_]:=下一素数[p,-1]^e;s[n_]:=倍@@f1@@@FactorInteger[n];f[p_,e_]:=s[((q=NextPrime[p])^(e+1)-1)/(q-1)];s2[1]=1;s2[n_]:=倍@@f@@FactorInteger[n];a[n]:=n/GCD[n,s2[n]];数组[a,100](*阿米拉姆·埃尔达尔2021年11月5日*)
黄体脂酮素
(平价)
A003961号(n) =我的(f=系数(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));factorback(f);\\发件人A003961号
A064989号(n) ={my(f);f=因子(n);如果(n>1&&f[1,1]==2),f[1,2]=0);对于(i=1,#f~,f[i,1]=precprime(f[i、1]-1));因子回退(f)};
1, -1, -2, -10, -1, 2, -2, 18, -25, 1, -5, 20, -4, 2, 2, 46, -3, 25, -2, 10, 4, 5, -6, -36, -33, 4, 86, 20, -1, -2, -17, -220, 10, 3, 2, 250, -10, 2, 8, -18, -7, -4, -2, 50, 25, 6, -8, -92, -81, 33, 6, 40, -6, -86, 5, -36, 4, 1, -29, -20, -13, 17, 50, -886, 4, -10, -4, 30, 12, -2, -31, -450, -3, 10, 66, 20, 10, -8, -10
配方奶粉
a(1)=1;a(n)=和{d|n,d<n}A326042型(n/d)*a(d)。
数学
f1[p_,e_]:=下一素数[p]^e;s1[1]=1;s1[n_]:=倍@@f1@@@FactorInteger[n];f2[2,e]:=1;f2[p_,e_]:=下一素数[p,-1]^e;s2[1]=1;s2[n_]:=倍@@f2@@FactorInteger[n];s[n_]:=s2[DivisorSigma[1,s1[n]]];a[1]=1;a[n_]:=a[n]=-除数和[n,a[#]*s[n/#]&,#<n&];数组[a,100](*阿米拉姆·埃尔达尔2021年11月27日*)
黄体脂酮素
(平价)
A003961号(n) =我的(f=系数(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));factorback(f);\\发件人A003961号
A064989号(n) ={my(f);f=因子(n);如果(n>1&&f[1,1]==2),f[1,2]=0);对于(i=1,#f~,f[i,1]=precprime(f[i、1]-1));因子回退(f)};
memoA349623=地图();
A349623型(n) =如果(1==n,1,my(v));如果(mapisdefined(memoA349623,n,&v),v,v=-sumdiv(n,d,if(d<n,A326042型(n/d)*49623美元(d) ,0));地图(备忘录A349623,n,v);(v) );
1, -1, -1, 9, -4, 1, -5, -19, 23, 4, -6, -9, -9, 5, 4, 43, -14, -23, -17, -36, 5, 6, -17, 19, 29, 9, -65, -45, -28, -4, -14, -43, 6, 14, 20, 207, -27, 17, 9, 76, -34, -5, -41, -54, -92, 17, -39, -43, 71, -29, 14, -81, -47, 65, 24, 95, 17, 28, -30, 36, -48, 14, -115, 981, 36, -6, -63, -126, 17, -20, -40, -437, -70, 27
数学
f1[p_,e_]:=下一素数[p]^e;s1[1]=1;s1[n_]:=倍@@f1@@@FactorInteger[n];f2[2,e]:=1;f2[p_,e_]:=下一素数[p,-1]^e;s2[1]=1;s2[n_]:=倍@@f2@@FactorInteger[n];s[n_]:=s2[DivisorSigma[1,s1[n]]];a[n_]:=除数和[n,#*MoebiusMu[#]*s[n/#]&];数组[a,100](*阿米拉姆·埃尔达尔2021年11月27日*)
黄体脂酮素
(平价)
A003961号(n) =我的(f=系数(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));factorback(f);\\发件人A003961号
A064989号(n) ={my(f);f=因子(n);如果(n>1&&f[1,1]==2),f[1,2]=0);对于(i=1,#f~,f[i,1]=precprime(f[i、1]-1));因子回退(f)};
1, 1, 1, -8, 4, 1, 5, 2, -22, 4, 6, -8, 9, 5, 4, 50, 14, -22, 17, -32, 5, 6, 17, 2, -13, 9, 20, -40, 28, 4, 14, -120, 6, 14, 20, 176, 27, 17, 9, 8, 34, 5, 41, -48, -88, 17, 39, 50, -46, -13, 14, -72, 47, 20, 24, 10, 17, 28, 30, -32, 48, 14, -110, -1126, 36, 6, 63, -112, 17, 20, 40, -44, 70, 27, -13, -136, 30, 9, 69
数学
f1[p_,e_]:=下一素数[p]^e;s1[1]=1;s1[n_]:=倍@@f1@@@FactorInteger[n];f2[2,e]:=1;f2[p_,e_]:=下一素数[p,-1]^e;s2[1]=1;s2[n_]:=倍@@f2@@FactorInteger[n];s[n_]:=s2[DivisorSigma[1,s1[n]]];sinv[1]=1;sinv[n_]:=sinv[n]=-DivisorSum[n,sinv[#]*s[n/#]&,#<n&];a[n_]:=除数和[n,#*sinv[n/#]&];数组[a,100](*阿米拉姆·埃尔达尔2021年11月27日*)
黄体脂酮素
(平价)
A003961号(n) =我的(f=系数(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));factorback(f);\\发件人A003961号
A064989号(n) ={my(f);f=因子(n);如果(n>1&&f[1,1]==2),f[1,2]=0);对于(i=1,#f~,f[i,1]=precprime(f[i、1]-1));因子回退(f)};
memoA349623=地图();
49623美元(n) =如果(1==n,1,my(v));如果(mapisdefined(memoA349623,n,&v),v,v=-sumdiv(n,d,if(d<n,A326042型(n/d)*A349623型(d) ,0));地图(备忘录A349623,n,v);(v) );
搜索在0.026秒内完成
查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。
许可协议、使用条款、隐私政策。.
上次修改时间:美国东部夏令时2024年9月21日09:30。包含376084个序列。(在oeis4上运行。)
|