OEIS哀悼西蒙斯并感谢西蒙斯基金会对包括OEIS在内的许多科学分支研究的支持。
登录
OEIS由支持OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
352589美元 按行读取的三角形:T(k,n)(k>=0,n=0,…,k)=使用2 X 2和1 X 1平铺和多米诺骨牌的k X n矩形的平铺数。 16
1, 1, 1, 1, 2, 8, 1, 3, 26, 163, 1, 5, 90, 1125, 15623, 1, 8, 306, 7546, 210690, 5684228, 1, 13, 1046, 51055, 2865581, 154869092, 8459468955, 1, 21, 3570, 344525, 38879777, 4207660108, 460706560545, 50280716999785, 1, 34, 12190, 2326760, 527889422, 114411435032, 25111681648122, 5492577770367562, 1202536689448371122 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消
0,5
评论
有关平铺算法,请参见A351322型.
表由行读取。读取序列{T(k,n)},n=0,1,2,。。。,对于n>k,使用T(n,k)代替T(k,n)。
链接
格哈德·基什内尔,Maxima代码
例子
三角形T(k,n)开始
k\n_0_1___2 ______ 3 ________ 4 __________ 5 ____________ 6
0: 1
1: 1 1
2: 1 2 8
3: 1 3 26 163
4: 1 5 90 1125 15623
5: 1 8 306 7546 210690 5684228
6: 1 13 1046 51055 2865581 154869092 8459468955
MAPLE公司
b: =proc(n,l)选项记忆;局部k,t;
如果n=0或l=[],则为1
elif-min(l[])>0,则t:=min(l[]);b(n-t,映射(h->h-t,l))
当l[k]>0进行od时,else为k;b(n,底土(k=1,l))+
`如果`(n>1,b(n,底土(k=2,l)),0)+`如果`(k<nops(l)
且l[k+1]=0,b(n,底土(k=1,k+1=1,l))+
`如果`(n>1,b(n,底土(k=2,k+1=2,l)),0),0
fi(菲涅耳)
结束时间:
T: =(n,k)->b(最大值(n,k),[0$最小值(n、k)]):
seq(seq(T(n,k),k=0..n),n=0..10)#阿洛伊斯·海因茨2022年5月6日
数学
b[n_,l_List]:=b[n,l]=模块[{k,t},其中[
n==0|l=={},1,
最小[l]>0,t=最小[l];b[n-t,l-t],
真,对于[k=1,l[[k]]>0,k++];b[n,替换部件[l,k->1]]+
如果[n>1,b[n,ReplacePart[l,k->2],0]+如果[k<长度[l]&&
l[[k+1]]==0,b[n,可替换部件[l,{k->1,k+1->1}]]+
如果[n>1,b[n,ReplacePart[l,{k->2,k+1->2}]],0],0]];
T[n_,k_]:=b[最大[n,k],数组[0&,最小[n,k]]];
表[表[T[n,k],{k,0,n}],{n,0,10}]//展平(*Jean-François Alcover公司2022年5月16日之后阿洛伊斯·海因茨*)
黄体脂酮素
(Maxima)请参阅Maxima代码链接。
交叉参考
T(1,n)=A000045号(n+1),斐波那契数。
T(2,n)=A052543号(n) ●●●●。
T(3,n)=A226351型(n) ●●●●。
T(4,n)=A352590型(n) ●●●●。
T(5,n)=A352591型(n) ●●●●。
T(n,n)给出A353777.
关键词
非n,
作者
格哈德·基什内尔2022年3月22日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月4日10:52。包含373096个序列。(在oeis4上运行。)