%I#8 2021年10月6日18:43:34

%S 0,1,0,2,1,2,4,4,4,1,6,8,10,10,13,16,20,22,28,32,38,43,52,62,72,82,96，

%电话：110128148170196224256292334380432490557630714806908，

%电话：1022115212941456163218302049229025602860318355439584404

%N将N划分为具有奇数秩的不同部分的数目。

%F a（n）=总和（A117195（n，k）*（k mod 2）：0<=k<n）。

%F a（n）=A000009（n）-A117192（n）。

%F a（n）=A117192（n）-A003406（n）。

%t a[n_]：=计数[整数分区[n]，q_/；奇数q[First[q]-长度[q]]&&长度[q]==长度[Union[q]]；

%t数组[a，60]（*_Jean-François Alcover_，2021年10月6日*）

%Y参考A000009、A003406、A101707、A117192。

%K nonn公司

%O 1,4型

%A _Reinhard Zumkeller_，2006年3月3日