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

 

标志


提示
(问候来自整数序列在线百科全书!)
邮编:A252737 不规则表的行和A005940号,邮编:A163511,和A332977飞机. 10
1、2、7、28、130、702、4384、31516、260068、2445372、25796360、299286550、3751803964、50211590696、712746859372810697637496288、169490835356880、283092547778810、497859069336838240、9212730983388684878、17944637546960083042、368472898102440537484、7993616254370783660414、183539682466936703629744 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

0,2个

链接

阿洛伊斯·P·海因茨,n=0..450时的n,a(n)表

公式

a(0)=1;对于n>1:a(n)=和{k=A000079号(n-1)。。A000225(n) }邮编:A163511(k) =和{k=2^(n-1)。。(2^n)-1}邮编:A163511(k) 一。

枫木

b: =proc(n,i)选项记住;`if`(n=0,1,add(b(n-`if`(

i=0,j,1),j)*i素数(j),j=1….`if`(i=0,n,i)))

结束:

a: =n->b(n,0):

顺序(a(n),n=0..23)#海因茨2020年3月4日

黄体脂酮素

(平价)

分配项(234567890);

A003961号(n) =my(f=因子(n));对于(i=1,#f~,f[i,1]=nexttime(f[i,1]+1));factorback(f);\\使用代码米歇尔·马库斯

a252737打印(up_to_n)={my(s,i=0,n=0);对于(n=0,up_to_n,if(0==n,s=1,if(1==n,s=2;lev=向量(1);lev[1]=2,oldlev=lev;lev=向量(2*长度(oldlev));s=0;对于(i=0,(2^(n-1))-1,lev[i+1]=if((i%2),A003961号(oldlev[(i\2)+1]),2*oldlev[(i\2+1]);s+=lev[i+1]);write(“b252737.txt”,n,“,s));};

A252737印刷体(23);\\术语a(0)。。用该程序计算了a(23)。

(方案,两个备选版本)

(定义(邮编:A252737n) (如果(零?n) 添加(1邮编:A163511(A000079号(-n 1))(A000225n) ))

(定义(邮编:A252737n) (如果(零?n) 1(添加(合成A005940号1+)(A000079号(-n 1))(A000225n) ))

(定义(添加intfun lowlim uplim)(让sumloop((i lowlim)(res 0))(条件((>i uplim)res)(其他(sumloop(+1 i)(+res(intfun i))))))

(定义(组成。funlist)(cond((空?函数列表)(lambda(x)x))(else(lambda(x)((car funlist)((apply COMPOSE(cdr funlist)))))))

交叉引用

表的行和A005940号,邮编:A163511,和A332977飞机.

囊性纤维变性。邮编:A252738(世界其他地区的产品)。

囊性纤维变性。A000079号,A000225,邮编:A252745,邮编:A252746.

上下文顺序:A227845号 A118926年 A127084号*A217203号 A052319号 邮编:A127783

相邻序列:邮编:A252734 邮编:A252735 邮编:A252736*邮编:A252738 A252739号 A252740号

关键字

作者

安蒂·卡尔图宁2014年12月21日

状态

经核准的

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

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

上次修改日期:美国东部时间2020年8月10日04:38。包含336368个序列。(运行在oeis4上。)