%I#8 2019年7月5日18:32:19
%S 1,1,0,0,2,1,2,1,3,3,8,7,10,13,17,19,28,35,38,51,67,81100128157,
%电话:19523328534842750661373387310631231503180221312537,
%电话:30053565417149225820677580019333108601273914840172062002923248
%N包含其多重数集(作为子多重集)的N的整数分区数。
%C这些分区的海因茨数由A325755给出。
%e分区x=(4,3,1,1,1)具有重数(3,1,1),这是x的子倍数集,因此x在a(10)下计数。
%e a(1)=1到a(11)=7分区:
%e(1)(22)(221)(2211)(3211)(4211)(333)(3322)(7211)
%e(211)(3111)(32111)(5211)(3331)(33221)
%e(41111)(32211)(6211)(52211)
%e(42211)(53111)
%e(43111)(322211)
%e(322111)(332111)
%e(421111)(431111)
%e(511111)
%t submultQ[cap_,fat_]:=和@@函数[i,Count[fat,i]>=计数[cap,i]]/@并集[List@@cap]
%t表[Length[Select[Integer Partitions[n],submultQ[Sort[Length/@Split[#]],#]&]],{n,0,30}]
%Y参见A000041、A181819、A225486、A290689、A290822、A304360、A323014、A324736、A324748、A324753、A324843、A325254、A325755。
%K nonn公司
%0、5
%A _Gus Wiseman_,2019年5月18日