%I#12 2020年10月20日08:20:40

%S 0,1,4,12,20,52，6014819630033278082819042080234828126352，

%电话：660814736156321745618640411524243260912648008092885408，

%电话：1863041875844064004573444974725234565852805962881284224134803214577921495424

%N整数1到N的互质子集中的元素数。

%对于集合中的每一对整数，互素集合的（m，n）=1。

%D Alan Sutcliffe，《整数集合中的除数和公因数》，等待出版。

%H Fausto A.C.Cariboni，n表，n=0..120时的A（n）</a>

%e a（4）=20，因为（1,2,3,4）的12个互质子集是（）（1）（2）（3）（4）（1,2）（1,3）（1,4）（2,3）（3,4。

%o（PARI）iscoprime（v）={local（i）；对于（i=1，#v-1，对于（j=i+1，#v，if（gcd（v[i]，v[j]）！=1，return（0）；）；）返回（1）；}

%o a（n）={sn=向量（n，i，i）；pset=向量（1<<#sn，i，vecextract（sn，i-1））；nb=0；对于（i=1，#pset，if（iscoprime（pset[i]），nb+=#pset[i）；）；return（nb）；}\\_Michel Marcus_，2013年7月12日

%Y A087077给出了基本子集中元素的数量。A084422给出了数互质子集。A087081给出互质子集中元素的和。

%K nonn公司

%0、3

%A Alan Sutcliffe（alansut（AT）ntlworld.com），2003年8月12日

%E第a（38）条及以后条款，自2020年10月20日起生效