登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志

请做一个捐赠让OEIS继续运行。我们现在已经56岁了。在过去的一年里,我们增加了10000个新序列,达到了近9000个引用(通常说“感谢OEI的发现”)。
其他方式捐赠

提示
(问候来自百科全书行上的整数序列!)
A241391号 n的p的个数,使得不同部分的个数是一个部分或max(p)-min(p)是一个部分。 5
0、1、1、2、2、4、5、7、10、15、20、25、40、45、68、84、115、141、195、235、317、386、504、617、788、970、1224、1493、1862、2275、2802、3401、4191、5044、6144、7423、8962、10758、12966、15469、18586、22114、26376、31300、37285、43986、52182、61501、72647 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

0,4个

链接

n=0..48的n,a(n)表。

公式

a(n)+A241390(n)=A000041号(n) 对于n>=0。

例子

a(6)计算这5个分区:42321221221111111111。

数学

z=40;f[n_x]:=f[n]=整数部分[n];d[p_u]:=d[p]=长度[DeleteDuplicates[p]];

表[Count[f[n],p_/;MemberQ[p,d[p]]&&MemberQ[p,Max[p]-Min[p]],{n,0,z}](*A241387*)

表[Count[f[n],p_2;!MemberQ[p,d[p]]&&MemberQ[p,Max[p]-Min[p]],{n,0,z}](*A241388号*)

表[Count[f[n],p_/;MemberQ[p,d[p]]&&!成员q[p,Max[p]-Min[p]]],{n,0,z}](*A241389号*)

表[Count[f[n],p_2;!成员Q[p,d[p]]&&!成员q[p,Max[p]-Min[p]]],{n,0,z}](*A241390*)

表[Count[f[n],p_/;MemberQ[p,d[p]]| | MemberQ[p,Max[p]-Min[p]],{n,0,z}](*A241391号*)

交叉引用

囊性纤维变性。A241387,A241388号,A241389号,A241390,A000041号.

上下文顺序:A238594号 A239945号 A238875号*A241736号 A034398号 A277062号

相邻序列:A241388号 A241389号 A241390*A241392号 A241393号 A241394号

关键字

,容易的

作者

克拉克·金伯利2014年4月21日

状态

经核准的

查找|欢迎光临|维基|登记|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索者|最近
OEIS社区|维护人OEIS基金公司。

许可协议,使用条款,隐私政策。.

上次修改日期:美国东部时间2020年11月28日20:57。包含338755个序列。(运行在oeis4上。)