%I#5 2019年6月14日21:52:00
%S 0,1,2,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,
%电话:27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,
%U 50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67
%{1..N}的子集数,其乘积等于其和。
%C与A001477(非负整数)相同,去掉3。
%e a(1)=1到a(9)=10子集:
%e{1}{1}{1}}{1}{1{1}{1}}{1}{1}{1
%e{2}{2}{2}}{2}{2{2}{2}[2]
%e(电子)
%e{1,2,3}{4}{4{4}
%电子{1,2,3}{5}{5{5}
%电子{1,2,3}{6}{6{6}
%e{1,2,3}{7}{7}{7}
%电子{1,2,3}{8}{8{
%电子{1,2,3}{9}
%电子{1,2,3}
%t表[Length[Select[Subsets[Range[n]],Times@@#==Plus@@#&]],{n,0,10}]
%Y参见A053632、A057567、A05756、A063865、A301987、A326156、A326158、A326、179、A321、180。
%K nonn,哑巴
%0、3
%A _Gus Wiseman_,2019年6月13日