A341646-OEIS公司

A341646

具有严格优越的无平方因子的数字。

2, 3, 5, 6, 7, 10, 11, 12, 13, 14, 15, 17, 18, 19, 20, 21, 22, 23, 24, 26, 28, 29, 30, 31, 33, 34, 35, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 50, 51, 52, 53, 55, 56, 57, 58, 59, 60, 61, 62, 63, 65, 66, 67, 68, 69, 70, 71, 73, 74, 75, 76, 77, 78, 79, 80 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`如果d>n/d，我们将除数d\|n定义为严格上除数A056924号并由列出A341673型.` `这是A007916号也就是说，这里没有完美的力量。[对于完全幂n，假设一个具有不同素数p，q，r，s的严格上无平方除数d=pqr……有一个互补除数n/d=p^iq^jr^ks……具有i，j，k>=1，因此互补除数至少与d一样大，这是一个矛盾。]A007916号但这里没有48、54、72、96、108、160、162、192-R.J.马塔尔2023年7月7日` `这是的副本吗A089105号? -R.J.马塔尔2023年7月24日`
	链接	`n=1..66时的n、a（n）表。`
	例子	`60具有三个严格优越的平方除数{10,15,30}，因此60在序列中。`
	MAPLE公司	`isA341646:=进程（n）` `局部d；` `对于numtheory中的d[除数]（n）do` `如果d>n/d，则` `如果issqrfree（d），则` `返回true；` `结束条件：；` `结束条件：；` `结束do：` `假；` `结束进程：` `n从2到100 do` `如果是A341646（n），则` `printf（“%d，”，n）；` `结束条件：；` `结束do：#R.J.马塔尔2023年7月7日`
	数学	`选择[Range[100]，Function[n，Select[Divisors[n]，SquareFreeQ[#]&#>n/#&]={}]]`
	交叉参考	`素数而不是无平方除数的版本是A064052号.` `素数幂而非无平方除数的形式是A051283号.` `弱优版本是对A059172号.` `奇数除数而非无平方除数的版本是A116883号.` `这些是非零项在A341595型.` `补语是A341645型.` `A005117号列出了无平方数。` `A038548号计算上级（或下级）除数。` `A056924号计算严格上级（或严格下级）除数。` `A140271号选择最小的严格上除数。` `A207375型列出中心除数。` `A341673型严格列出上级除数。` `-低级：A033676号,A063962号,A066839号,A069288号,A161906号,217581英镑,A333749型.` `-上级：A033677号,A063538号,A063539号,A070038号,A072500型,A116882号,A161908号,A341591飞机,A341592飞机,A341593飞机,A341675型,A341676飞机.` `-严格低级：A060775号,A070039号,A333805型,A333806型,A341596型,A341674型.` `-严格上级：A048098型,A238535型,A341594飞机,A341595型,A341643型,A341644型.` `囊性纤维变性。A001222号,A001248号,A006530号,A020639号,A112798号.` `的后续A007916号.` `上下文中的序列：A175082号 A007916号 A052485型A109421号 A335433型 A345172` `相邻序列：A341643型 A341644型 A341645型A341647飞机 A341648飞机 A341649型`
	关键字	`非n`
	作者	`古斯·怀斯曼2021年2月22日`
	状态	`经核准的`