|
| |
|
| A361391型 |
| 具有非整数平均值的n的严格整数分区数。 |
|
2
|
|
|
|
1, 0, 0, 1, 0, 2, 0, 4, 2, 4, 5, 11, 0, 17, 15, 13, 15, 37, 18, 53, 24, 48, 78, 103, 23, 111, 152, 143, 123, 255, 110, 339, 238, 372, 495, 377, 243, 759, 845, 873, 414, 1259, 842, 1609, 1383, 1225, 2281, 2589, 1285, 2827, 2518, 3904, 3836, 5119, 3715, 4630
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,6
|
|
|
评论
|
1、2、4、6、12是唯一的零吗？
|
|
|
链接
|
|
|
|
例子
|
a（3）=1到a（11）=11分区：
{2,1} . {3,2} . {4,3} {4,3,1} {5,4} {5,3,2} {6,5}
{4,1} {5,2} {5,2,1} {6,3} {5,4,1} {7,4}
{6,1} {7,2} {6,3,1} {8,3}
{4,2,1} {8,1} {7,2,1} {9,2}
{4,3,2,1} {10,1}
{5,4,2}
{6,3,2}
{6,4,1}
{7,3,1}
{8,2,1}
{5,3,2,1}
|
|
|
MAPLE公司
|
a： =proc（m）选项记忆；局部b；b：=
proc（n，i，t）选项记忆`如果`（i*（i+1）/2<n，
0，`if`（n=0，符号（irem（m，t）），
b（n，i-1，t）+b（n-i，min（n-i、i-1），t+1））
结束：`if`（m=0，1，b（m$2，0））
结束时间：
|
|
|
数学
|
表[Length[Select[Integer Partitions[n]，UnsameQ@@#&！整数Q[Mean[#]]&]]，{n，0，30}]
|
|
|
交叉参考
|
囊性纤维变性。A051293号,A082550号,A143773号,A175397号,A175761号,A240219型,A240850型,326027美元,A326641飞机,A326849型,第359897页.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
