A318749-OEIS公司

A318749型

n的两两相对非素数严格因子分解数（没有两个因子是互质的）。

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

	抵消	`1,8`
	评论	`a（n）只依赖于n的素数签名（参见。A025487号). -Antti Karttunen公司2018年10月8日`
	链接	`安蒂·卡图恩，n=1..10000时的n，a（n）表` `安蒂·卡图恩，数据补充：n，a（n）为n=1.100000计算` `由n的因子分解中的指数计算的序列的索引项`
	例子	`a（96）=7的因子分解是（96），（248），（424），（616），（812），（2%412）和（268）。` `a（480）=18因子分解：` `(480)` `(2240) (4120) (680) (860) (1048) (1240) (1630) (2024)` `(2460) (2640) (2830) (21024) (21220) (4620) (41012) (6810)` `(24610)`
	数学	`strfacs[n_]：=如果[n<=1，{{}}，连接@@表[（前缀[#1，d]&）/@选择[strfacs[n/d]，最小@@#1>d&]，{d，剩余[Divisors[n]]}]]；` `表[Length[Select[strfacs[n]，And@@（GCD[##]>1&）@@@Select[Tuples[#，2]，Less@@#&]&]]，{n，50}]`
	黄体脂酮素	`（PARI）A318749型（n，m=n，facs=List（[]））=如果（1==n，（1！=gcd（Vec（facs））），我的（s=0，newfacs）；对于div（n，d，如果（d>1）&&（d<=m），newfacs=列表（facs）；listput（newfacs，d）；秒+=A318749型（n/d，d-1，newfacs）））；（s））\\Antti Karttunen公司2018年10月8日`
	交叉参考	`囊性纤维变性。A001055号,A045778号,A051185号,A281116号,A303282型,A305843型,A305854型,A317748型,A318715型,18717年,A318721型.` `上下文中的序列：A361566飞机 A354991型 54990英镑A347708型 A050330型 A339890型` `相邻序列：A318746型 A318747型 A318748型A318750型 A318751型 A318752型`
	关键词	`非n`
	作者	`古斯·怀斯曼2018年9月2日`
	扩展	`更多术语来自Antti Karttunen公司2018年10月8日`
	状态	`经核准的`