搜索: a346105-识别码:a346105
|
|
|
|
0, 1, 2, 2, 6, 3, 30, 3, 4, 7, 210, 4, 2310, 31, 8, 4, 30030, 5, 510510, 8, 32, 211, 9699690, 5, 12, 2311, 6, 32, 223092870, 9, 6469693230, 5, 212, 30031, 36, 6, 200560490130, 510511, 2312, 9, 7420738134810, 33, 304250263527210, 212, 10, 9699691, 13082761331670030, 6, 60, 13, 30032, 2312, 614889782588491410, 7, 216, 33, 510512, 223092871, 32589158477190044730, 10
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
评论
|
|
|
链接
|
|
|
公式
|
其他身份。
对于所有n>=0:
当应用于n的除数的某个子集借助于A276086型,这将生成相应的数字理论序列,即完成其计算:
这里,这两个序列是彼此的反向排列:
其他信函:
(结束)
|
|
数学
|
nn=60;b=混合基数[Reverse@Prime@Range@PrimePi[nn+1]];Table[FromDigits[#,b]&@Reverse@If[n==1,{0},Function[k,ReplacePart[Table[0],{PrimePi[k[[-1,1]]]}],#]&@Map[PrimePi@First@#->Last@#&,k]]@FactorInteger@n],{n,nn}](*版本10.2或*)
f[w_List]:=总计[Times@@@Transpose@{Map[Times@@#&,Prime@Range@Range[0,Length@w-1]],Reverse@w}];表[f@Reverse@If[n==1,{0},函数[k,ReplacePart[Table[0,{PrimePi[k[-1,1]]}],#]&@Map[PrimePi@First@#->Last@#&,k]]@FactorInteger@n],{n,60}](*迈克尔·德弗利格2016年8月30日*)
|
|
黄体脂酮素
|
(方案,带有备忘录-宏定义)
(PARI)
(Python)
来自症状输入primorial,primepi,factorint
定义a002110(n):
如果n<1,则返回1
定义a(n):
f=因子(n)
f中i的返回和(f[i]*a002110(素数(i)-1)
打印([a(n)代表范围(1101)中的n)]#因德拉尼尔·戈什2017年6月22日
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
2, 3, 5, 9, 7, 25, 11, 15, 35, 49, 13, 625, 17, 121, 117649, 225, 19, 1225, 23, 2401, 1771561, 169, 29, 875, 717409, 289, 55, 14641, 31, 184877, 37, 21, 4826809, 361, 36226650889, 1500625, 41, 529, 24137569, 77, 43, 143, 47, 28561, 1127357, 841, 53, 1715, 902613283, 514675673281, 47045881, 83521, 59, 3025, 8254129, 214358881, 148035889, 961, 61
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
公式
|
(结束)
|
|
数学
|
使用[{b=MixedRadius[Reverse@Prime@Range@120]},Array[Function[k,Times@@Power@@#&@Transpose@{Prime@Range@Length@k,Reverse@@k}]@IntegerDigits[Apply[Times,Map[#1^#2&@@#&,FactorInteger[#]/。{p,e}/;e>0:>{Times@@Prime@Range@PrimePi@p,e}]],b]&,58]](*迈克尔·德弗利格2019年11月18日*)
A276086型[n0_]:=模[{m=1,i=1,n=n0,p},而[n>0,p=素数[i];m*=p^Mod[n,p];n=商[n,p];i++];m] ;
b[n_]:=b[n]=模块[{pe=FactorInteger[n],p,e},如果[Length[pe]>1,时间@@b/@Power@@@pe,{{p,e{}=pe;次数@@(素数[Range[PrimePi[p]]^e)]];b[1]=1;
|
|
黄体脂酮素
|
(PARI)
A276086型(n) ={my(i=0,m=1,pr=1,nextpr);while(n>0),i=i+1;nextpr=素数(i)*pr;if;
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 2, 3, 4, 5, 9, 7, 2, 3, 25, 11, 81, 13, 49, 15625, 4, 17, 9, 19, 625, 117649, 121, 23, 27, 1225, 169, 21, 2401, 29, 3125, 31, 10, 1771561, 289, 5764801, 81, 37, 361, 4826809, 5, 41, 7, 43, 14641, 12005, 529, 47, 75, 1127357, 1500625, 24137569, 28561, 53, 441, 14641, 5764801, 47045881, 841, 59, 125, 61, 961, 343, 100, 302875106592253
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
|
|
链接
|
|
|
公式
|
|
|
黄体脂酮素
|
(PARI)
A064989号(n) ={my(f=factor(n));如果(n>1&&f[1,1]==2),f[1,2]=0);对于(i=1,#f~,f[i,1]=precprime(f[i、1]-1));factorback(f);};
|
|
交叉参考
|
|
|
关键词
|
非n,压裂
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 3, 9, 6, 39, 18, 249, 9, 39, 78, 2559, 36, 32589, 498, 234, 18, 543099, 78, 10242789, 156, 1494, 5118, 233335659, 57, 996, 65178, 258, 996, 6703028889, 405, 207263519019, 42, 15354, 1086198, 6612, 156, 7628001653829, 20485578, 195534, 249, 311878265181039, 2559, 13394639596851069, 10236, 1245, 466671318, 628284422185342479
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
公式
|
|
|
黄体脂酮素
|
(PARI)
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)};
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
0, 1, 3, 2, 9, 6, 39, 1, 3, 18, 249, 12, 2559, 78, 54, 2, 32589, 6, 543099, 36, 234, 498, 10242789, 9, 96, 5118, 42, 156, 233335659, 45, 6703028889, 10, 1494, 65178, 312, 12, 207263519019, 1086198, 15354, 9, 7628001653829, 39, 311878265181039, 996, 165, 20485578, 13394639596851069, 21, 1284, 192, 195534, 10236, 628284422185342479
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
链接
|
|
|
公式
|
|
|
黄体脂酮素
|
(PARI)
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)};
A319627型(n) ==========================================================================================(A064989号(n) /gcd(n,A064989号(n) );
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.006秒内完成
|