显示1-1个结果(共1个)。
第页1
1, 0, 1, 1, 2, 2, 3, 4, 6, 6, 9, 11, 15, 18, 22, 27, 34, 41, 51, 62, 75, 90, 109, 129, 153, 185, 217, 258, 307, 359, 421
评论
这些分区没有分区,因此可以为每个部分选择不同的除数。
例子
a(0)=1到a(9)=6分区:
() . (2) (3) (4) (5) (6) (7) (8) (9)
(2,2) (3,2) (3,3) (4,3) (4,4) (5,4)
(4,2) (5,2) (5,3) (6,3)
(3,2,2) (6,2) (7,2)
(3,3,2) (4,3,2)
(4,2,2) (5,2,2)
数学
Table[Length[Select[InterPartitions[n],FreeQ[#,1]&&Length[Select[Tuples[Divisors/@#],UnnameQ@@#&]]>0&]],{n,0,30}]
搜索在0.005秒内完成
|