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

 

标志

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

提示
(问候来自百科全书行上的整数序列!)
A241388号 n的p的个数,使得不同部分的数目不是一个部分,max(p)-min(p)是一个部分。 5
0,0,0,0,0,0,0,0,1,1,1,5,2,7,10,15,14,30,28,49,56,81,89,135,148,212,246,327,377,506,578,759,883,1119,1314,1651,1918,2388,2789,3429,4012,4880,5688,6883,8029,9618,11213,13388,15550,18464,21431,25316,29343 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

0,13

链接

n=n的n..0。

公式

a(n)+A241387(n)+A241389号(n)=A241391号(n) 对于n>=0。

例子

a(9)计算这个分区:63。

数学

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}](*A2389号*)

表[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,A2389号,A241390,A241391号.

上下文顺序:A200646年 A198130 A309773飞机*A305574飞机 A248259号 邮编:A128666

相邻序列:A241385号 A241386号 A241387*A241389号 A241390 A241391号

关键字

,容易的

作者

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

状态

经核准的

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

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

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