A073759-OEIS公司

A073759号

既不是n的除数也不是n的相对素数的最大数，如果不存在这样的数，则为0。

0, 0, 0, 0, 0, 4, 0, 6, 6, 8, 0, 10, 0, 12, 12, 14, 0, 16, 0, 18, 18, 20, 0, 22, 20, 24, 24, 26, 0, 28, 0, 30, 30, 32, 30, 34, 0, 36, 36, 38, 0, 40, 0, 42, 42, 44, 0, 46, 42, 48, 48, 50, 0, 52, 50, 54, 54, 56, 0, 58, 0, 60, 60, 62, 60, 64, 0, 66, 66, 68, 0, 70, 0, 72, 72, 74, 70, 76 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,6`
	评论	`n的最大“无关”数。` `发件人迈克尔·德弗利格2016年3月28日（开始）：` `素数n没有无关数m<n，因为所有这些数都是n的互素。` `无关数m必须是复合数，因为素数必须是n的除或互素。` `m=1在被除时不被视为无关，并且与n互素。` `a（4）＝0，因为4是最小的复合数，并且相对于n的不相关数m必须是复合数并且小于n。所有其他复合数n都至少有一个不相关数m。` `对属于n的无关数m的检验是1<gcd（m，n）<m。` `（结束）`
	链接	`迈克尔·德弗利格，n=1..10000时的n，a（n）表`
	例子	`n=20：无关集为20={6,8,12,14,15,16,18}，最大的是a（20）=18。`
	数学	`tn[x_]：=表[w，{w，1，x}]；di[x_]：=除数[x]；dr[x_]：=并集[di[x]，rrs[x]]；rrs[x_]：=压扁[位置[GCD[tn[x]，x]，1]]；unr[x_]：=补码[tn[x]，dr[x]]；表[Max[unr[w]]，{w，1，128}]；（对于空集，使用了0）。` `表[t=选择[r=范围[n-1]，可分割[n，#]\|\|GCD[n，#]==1&]；最大值[Join[{0}，Complement[r，t]]，{n，78}](贾扬达·巴苏2013年7月9日）` `表[SelectFirst[Range[n-2，2，-1]，1<GCD[#，n]<#&]/。n/；错过Q@n->0，{n，100}](迈克尔·德弗利格，2016年3月28日，10.2版）`
	黄体脂酮素	`（PARI）a（n）={对于步骤（k=n-2，1，-1，如果（（gcd（n，k）！=1）&&（n%k），返回（k）；）；0；}\\米歇尔·马库斯2016年3月29日`
	交叉参考	`囊性纤维变性。A045763号,A073758号.` `上下文中的序列：A073758号 A133995号 A019629号A066760型 A102393号 A228131型` `相邻序列：A073756号 A073757号 A073758号A073760型 A073761号 A073762号`
	关键字	`非n`
	作者	`拉博斯·埃利默2002年8月15日`
	状态	`经核准的`

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间：美国东部夏令时2024年4月23日20:33。包含371916个序列。（在oeis4上运行。）