登录
A241321型
划分为不同部分的n个分区的数量,既不包括地板(平均值(p)),也不包括天花板(平均值)。
5
0, 0, 0, 0, 1, 1, 2, 2, 3, 4, 5, 5, 10, 8, 11, 15, 19, 18, 27, 26, 40, 43, 46, 51, 79, 80, 86, 104, 131, 130, 190, 177, 228, 241, 264, 349, 428, 403, 454, 520, 709, 663, 880, 856, 1019, 1230, 1224, 1360, 1833, 1863, 2167, 2216, 2531, 2710, 3434, 3696, 4407
抵消
0,7
配方奶粉
a(n)+A241322型(n)=A000009号(n) 对于n>=1。
例子
a(11)统计这5个分区:{10,1}、{9,2}、}8,3}、[2]、}7,4}。
数学
z=30;f[n_]:=f[n]=选择[Integer Partitions[n],Max[Length/@Split@#]==1&];
表[计数[f[n],p_/;MemberQ[p,Floor[Mean[p]]&MemberQ[p,Ceiling[Mean[p]]],{n,0,z}](*A241318型*)
表[Count[f[n],p_/!MemberQ[p,Floor[Mean[p]]&MemberQ[p,Ceiling[Mean[p]]],{n,0,z}](*A241319型*)
表[计数[f[n],p_/;成员Q[p,下限[Mean[p]]&&!成员Q[p,上限[Mean[p]]],{n,0,z}](*A241320型*)
表[Count[f[n],p_/!MemberQ[p,Floor[平均值[p]]&&!成员Q[p,上限[Mean[p]]],{n,0,z}](*A241321型*)
表[计数[f[n],p_/;成员Q[p,下限[Mean[p]]||MemberQ[p,上限[Mean[p]]],{n,0,z}](*A241322型*)
关键词
非n,容易的
作者
克拉克·金伯利2014年4月19日
状态
经核准的