%I#31 2020年1月11日06:38:58

%S 0,0,00,0,1,0,0，0,0'，0,0，

%温度0,7,0,0,3,0,2,0,00,0,10,0:0,0,0，0,0',0,5,0,2,0，

%U 0,0,0,10,31,0,0、0,00,0，0,0'0,0'，0,0

%N与N相加的N的正除数的子集的数目。

%C亏数和奇数有a（n）=0，完全数和其他数（参见A064771）有a（n）=1。

%C将n划分为n的不同真除数的次数；a（A136447（n））=0；a（A005835（n））>0；a（A064771（n））=1.-_Reinhard Zumkeller_，2013年1月21日

%H Amiram Eldar，n表，n=1..100000的a（n）（T.D.Noe的术语1..1000）

%F a（n）=A033630（n）-1。

%e a（20）=1，因为{1,4,5,10}是20的真除数之和为20的唯一子集。

%e a（24）=5，因为有五个不同的子集，我们可以用来求和为24:{1，2，3，4，6，8}，{1，2,3，6，12}，}，1,3，8,12}，2,4，6,12}，{4，8,12,12}。

%t a[n_]：=（dd=大多数[Divisors[n]]；cc=数组[c，长度[dd]]；长度[{ToRules[Reduce[And@@（0<=#<=1&）/@cc&&dd.cc==n，cc，Integers]]}]）；表[a[n]，{n，1100}]（*Jean-François Alcover_，2012年2月23日*）

%o（哈斯克尔）

%o a065205 n=p（a027751 _ row n）n，其中

%o p _ 0=1

%o p[]_=0

%o p（k:ks）m=如果m<k，则0，否则p ks（m-k）+p ks m

%o——Reinhard Zumkeller，2013年1月21日

%o（PARI）a（n，s，d）={s||（s=sigma（n）-n）||return；d||d=vecextract（除数（n），“^-1”）；而（d[#d]>n，s-=d[#d_]；d=d[1..-2]）d[1..-2]）}\\ M.F.Hasler_，2015年5月11日

%Y参考A064771、A005835。

%Y参考A065218了解记录。

%Y参见A027751、A210442、A211110、A033630。

%K nonn公司

%O 1,12号

%乔纳森·艾尔斯（Jonathan.Ayres（AT）btinternet.com），2001年10月19日

%E Jud McCranie的更多条款和附加评论，2001年10月21日