登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A157904号 INVERT变换A000055号.
1、2、4、8、17、36、78、170、375、833、1870、4229、9654、22223、51622、120961、286029、682398、1642821、3990211、9777678、24166327、60233185、151350709、383287499、977918150、2512805727、6500178867、16921248231、44310858284、116678914575 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,2
评论
请注意,正确的INVERT变换A000055号(识别偏移)将为1、1、2、4、9、20、46、106、248、583、1386-R.J.马塔尔2020年9月20日
链接
阿洛伊斯·海因茨,n=0..700时的n,a(n)表
配方奶粉
INVERT变换A000055号: (1, 1, 1, 1, 2, 3, 6, 11, 23, 47, 106,...).
例子
a(3)=8=(1,1,1)点(1,2,4)+1=7+1=8;其中操作使用升序项A000055号:(1,1,1,2,3,6,11,…)和相等数量的持续递减项A157904号取点积并添加到下一项A000055号.a(4)=17=(1,1,1)点(1,2,4,8)+2=15+2。
MAPLE公司
with(numtheory):b:=proc(n)选项记住;局部d,j;如果n<=1,则n else(add(add(d*b(d),d=除数(j))*b(n-j),j=1.n-1))/(n-1)fi结束:t:=proc(n)选项记住;局部k`if`(n=0,1,b(n)-(add(b(k)*b(n-k),k=1..n-1)-`if`(type(n,odd),0,b(n/2)))/2)end:a:=proc(n)选项记住;局部i;如果n<=0,则1加上(t(i)*a(n-i-1),i=0..n)fi结束:seq(a(n),n=0..35)#阿洛伊斯·海因茨2009年3月31日
数学
b[n]:=b[n]=如果[n<=1,n,和[Sum[d b[d],{d,Divisors[j]}]b[n-j],{j,1,n-1}]/(n-1)];
t[n_]:=t[n]=如果[n==0,1,b[n]-(总和[b[k]b[n-k],{k,1,n-1}]-如果[OddQ[n],0,b[n/2])/2];
a[n_]:=a[n]=如果[n<=0,1,和[t[i]a[n-i-1],{i,0,n}]];
a/@范围[0,30](*让-弗朗索瓦·奥尔科弗2020年9月22日之后阿洛伊斯·海因茨*)
交叉参考
囊性纤维变性。A000055号,A157905号.
关键词
非n
作者
加里·亚当森2009年3月8日
扩展
更多术语来自阿洛伊斯·海因茨2009年3月31日
状态
经核准的

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

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

上次修改时间:2024年4月17日22:23 EDT。包含371767个序列。(在oeis4上运行。)