|
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]];表[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]],反向@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)
从sympy导入primarial,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日
|
|
交叉参考
|
囊性纤维变性。A000040型,A000720号,A002110号,A028234号,A048103号,A049345号,A055396号,A067029号,电话:108951,A143293号,A276154号,A328316型,A328624型,A328625型,328768美元,A328832型,A346105型,A351576型.
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|