A146891-OEIS公司

A146891号

从2^n开始重复还原usigma的终点。

1, 6, 20, 72, 72, 72, 20, 72, 72, 17280, 4800, 17280, 72, 17280, 1152000, 5184, 5184, 5184, 96000, 5184, 345600, 1244160, 320000, 1244160, 82944000, 89579520, 71663616000, 298598400, 1244160, 82944000, 23040000, 82944000, 19906560000 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`0,2`
	评论	`设PF_p（n）是p除以n的最大幂。例如PF_2（n）=A006519号（n），PF_3（n）=A038500型（n）且PF_5（n）=5^A112765型（n）对于p=2、3和5的情况。` `多诱导PF_（p1，p2，…）。。。` `对于每个n，我们定义了一个辅助序列b（k），从b（0）=2^n开始，通过b（k+1）=A034448号（b（k））/PF_（2,3,5）(A034448号（b（k）），即从单位σ值中重复删除2、3和5的所有幂。b（k）在某个k处终止，b（k）=1。此外，还有一个由c（0）=2^n和递归地c（k+1）=c（k）*PF_（3,5）定义的辅助并行序列c（k(A034448号（b（k））/A006519号(A034448号（b（k）），将2^n减去按序列b划分的2的幂。` `序列由a（n）=c（k）定义，辅助序列c位于b终止的点。` `序列a（n）的所有值都是5-光滑的，即A051037号.`
	链接	`n=0..32时的n，a（n）表。`
	例子	`n=5个` `b（n）：2^5->11->1` `c（n）：2^5->2^53->2^33^2` `所以a（5）=c（2）=2^3*3^2=72。`
	MAPLE公司	`PF:=proc（n，p）局部nshf，a；a:=1；nshf:=n；而（nshf mod p）=0执行nshf：=nshf/p；a:=ap；od:a；结束时间：` `146891英镑：=程序（n）局部b，a，k，t；` `b：=[2^n]；` `而op（-1，b）<>1` `电话：=A034448号（op（-1，b））；` `b：=[op（b），t/A006519号（t）/A038500型（t） /PF（t，5）]；` `日期：` `a:=2^n；` `对于k从2到nops（b）do` `电话：=A034448号（op（k-1，b））；` `a：=a/A006519号（t）A038500型（t） *PF（t，5）；` `日期：` `a；` `结束时间：` `#R.J.马塔尔2009年6月24日`
	数学	`PF[n_，p_]：=p^整数指数[n，p]；` `usigma[n_]：=如果[n==1，1，Times@@（1+Power@@@FactorInteger[n]）]；` `A146891号[n_]：=模块[{b，a，k，t}，` `b={2^n}；` `而[b[[-1]]！=1,` `t=usigma[b[[-1]]]；` `b=附加[b，t/PF[t，2]/PF[t，3]/PF[t,5]]；` `a=2^n；` `对于[k=2，k<=长度[b]，k++，` `t=usigma[b[[k-1]]；` `a=a/PF[t，2]PF[t，3]PF[t，5]]；` `a] ；` `表[A146891号[n] ，{n，0，32}](Jean-François Alcover公司2024年4月9日之后R.J.马塔尔)`
	交叉参考	`参见。146892英镑,A151659号.` `上下文中的序列：A050930型 A074353号 A075055号A235367号 A189604型 A153372号` `相邻序列：A146888号 A146889号 A146890号A146892号 146893英镑 A146894号`
	关键词	`非n`
	作者	`Yasutoshi Kohmoto公司2009年4月17日`
	扩展	`更多术语来自R.J.马塔尔2009年6月24日` `编辑人R.J.马塔尔2009年7月2日` `a（n）和c（k）之间关系的描述由更正R.J.马塔尔2009年7月7日`
	状态	`已批准`