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日

经核准的