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

 

徽标
提示
(来自的问候整数序列在线百科全书!)
A022423号 Kim-sums:“金伯利总和”K_n+K_12。 6
11、31、34、36、39、42、44、47、49、52、55、57、60、63、65、68、70、73、76、78、81、83、86、89、91、94、97、99、102、104、107、110、112、115、118、120、123、125、128、131、133、136、138、141、144、146、149、152、154、157、159、162、165、167、170、172、175、178、180 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,1
参考文献
发布到math-fun邮件列表1997年1月10日。
链接
J.H.Conway、Allan Wechsler、Marc LeBrun、Dan Hoey、N.J.A.Sloane、,关于Kimberling和和Para-Fibonacci序列,1996年11月至1997年1月数学基金邮件列表的通信和发布
MAPLE公司
Ki:=程序(n,i)
选项记忆;
局部phi;
φ:=(1+sqrt(5))/2;
如果i=0,则
n;
elif i=1,则
地板(n+1)*φ);
其他的
进程名(n,i-1)+进程名(n,i-2);
结束条件:;
结束进程:
基苏姆:=进程(n,m)
局部ks,a,i;
ks:=[seq(Ki(n,i)+Ki(m,i),i=0..5)];
对于i从0到2做
对于0中的a do
如果Ki(a,0)=ks[i+1]且Ki(a,1)=ks[i+2],则
返回a;
结束条件:;
如果Ki(a,0)>ks[i+1],则
断裂;
结束条件:;
结束do:
结束do:
结束进程:
A022423号:=进程(n)
如果n=0,则
11;
其他的
基苏姆(n-1,11);
结束条件:;
结束进程:
序列(A022423号(n) ,n=0..80)#R.J.马塔尔2016年9月3日
数学
Ki[n_,i_]:=Ki[n,i]=模[{φ=(1+Sqrt[5])/2},如果[i==0,n,如果[i==1,楼层[(n+1)*phi],Ki[n、i-1]+Ki[n和i-2]]];
Kisum[n_,m_]:=模块[{ks,a,i},ks=表[Ki[n,i]+Ki[m,i],{i,0,5}];对于[i=0,i<=2,i++,对于[a=0,True,a++,如果[Ki[a,0]==ks[[i+1]]&&Ki[a、1]==ks[[i+2]],返回[a]];如果[Ki[a,0]>ks[[i+1]],则中断[]]]];
a[n_]:=如果[n==0,11,Kisum[n-1,11]];
a/@范围[0,58](*Jean-François Alcover公司2020年3月29日之后R.J.马塔尔*)
交叉参考
i=2到12的“Kim-sums”K_n+K_i如所示A022413号,A022414号,2015年0月22日,A022416号, ...,A022423号.
关键字
非n
作者
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月23日08:19。包含371905个序列。(在oeis4上运行。)