编号：A252665-OEIS

搜索： 编号：a252665

显示1-1个结果（共1个）。

第页1

排序：关联|参考文献|数|被改进的|创建格式：长的|短的|数据

A252665型

用1<=a<=b<=c<=d<=n将n写成n=a*b*c*d*e的方法的数量。

+0
4

1, 1, 1, 2, 1, 2, 1, 3, 2, 2, 1, 4, 1, 2, 2, 5, 1, 4, 1, 4, 2, 2, 1, 7, 2, 2, 3, 4, 1, 5, 1, 7, 2, 2, 2, 9, 1, 2, 2, 7, 1, 5, 1, 4, 4, 2, 1, 12, 2, 4, 2, 4, 1, 7, 2, 7, 2, 2, 1, 11, 1, 2, 4, 10, 2, 5, 1, 4, 2, 5, 1, 16, 1, 2, 4, 4, 2, 5, 1, 12, 5, 2, 1, 11, 2 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,4`
	评论	`开头与相同，但不同于A218320型其中a（n）=A218320型（n） n=1..31。n的第一个值使得a（n）不同于A218320型（n）是32、48、64、72、80。` `启动方式也与A001055号，但与n=64不同。。。`
	链接	`迈克尔·德弗利格，n=1..10000时的n，a（n）表` `迈克尔·德弗利格，记录和记录的第一个位置`
	例子	`a（12）=4，因为我们可以写12=11112=11126=111134=112x2*3。`
	MAPLE公司	`带有（数字理论）：` `b： =proc（n，i，t）选项记忆；` `if`（n=1，1，`if`（t=1，`if'（n<=i，1，0）， `加法（b（n/d，d，t-1），d=选择（x->x<=i，除数（n）））` `结束：` `a： =proc（n）局部l，m；` `l： =排序（ifactors（n）[2]，（x，y）->x[2]>y[2]）；` `m： =mul（ithprime（i）^l[i][2]，i=1..nops（l））；` `b（米、米、五）` `结束：` `seq（a（n），n=1..100）#阿洛伊斯·海因茨2017年8月31日`
	数学	`表[c=0；Do[如果[i<=j<=k<=l<=m&ijklm==n，c++]，{i，t=Divisors[n]}，{j，t}，}；c、 {n，90}]` `（第二个节目：）` `b[n_，i_，t_]：=b[n，i，t]=如果[n==1，1，如果[t==1、Boole[n<=i]、总和[b[n/d，d，t-1]，{d，选择[Divisors@n，#<=i&]}]]；并行化@Array[b[#，#，5]&@Apply[Times，Power@@@Sort[FactorInteger[#]，#1[[2]]>#2[[2]&]]&，120](迈克尔·德弗利格2017年8月31日之后Jean-François Alcover公司在A218320型)`
	交叉参考	`囊性纤维变性。A001055号,A034836美元,A218320型.`
	关键词	`非n`
	作者	`米歇尔·拉格诺2014年12月20日`
	状态	`已批准`

第页1

搜索在0.004秒内完成