登录
OEIS基金会由OEIS的用户捐款和西蒙斯基金会的资助。

 

标志

感谢所有在我们年度呼吁中捐款的人!
若要查看捐赠者名单或捐款,请参阅OEIS基金会主页

提示
问候整数序列的在线百科全书!)
A191758 n阶四边谨慎自回避行走的数量在其盒的西北角结束。
1, 2, 4、10, 24, 60、146, 362, 894、2220, 5506, 13686、34014, 84620, 210538、524074, 1304662, 3248652、8089768, 20147228, 50177160、124972192, 311257258, 775219392、1930719596, 4808416726, 11974790286、29820532540, 74257690132 列表图表参考文献历史文本内部格式
抵消

0、2

推荐信

BouQuET-Me楼,谨慎自我回避行走的家庭,DTCC PROC。AJ,2008,167—180。

E. Duchi,在一些谨慎行走的阶层,在:FPSAC’05,陶尔米纳,意大利,2005。

链接

Alois P. Heinzn,a(n)n=0…100的表

例子

A(3)=10:ENW、NNN、NNW、NWN、NWW、WNN、WNW、WWN、WWW、SWN。

枫树

=:PROC(D,I,N,X,Y,W,S)选项记住;

‘f’(n=0,‘i'’(y=0,w=0, 1, 0),

‘If’(d)在[0, 1 ]或d(2, 4)和(x=0或i)中,

b(1,x=0,n-1,max(x-1,0),y,w+1,s),0)+

‘If’(d)在[0, 2 ]或d(1, 3)和(y=0或i)中,

b(2,y=0,n-1,x,max(y-1,0),w,s+1),0)+

‘If’(d)在[0, 3 ]或d(2, 4)和(w=0或i)中,

b(3,w=0,n-1,x+ 1,y,max(W-1,0),s),0)+

‘If’(d)在[0, 4 ]或d(1, 3)和(s=0或i)中,

B(4,S=0,N-1,X,Y + 1,W,max(S-1,0)),0)

结束:

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

SEQ(A(n),n=0…30);

Mathematica

B[d1,i],n-,x],y],W~,s]:= b[d,i,n,x,y,w,s]=

如果[n=0,如果[y== 0&w==0, 1, 0 ],

如果[d==0=1=1(d==1=1=4=4)& &(x= 0×i),

b〔1,x==0,n-1,马克斯[ x-1, 0〕,y,w+1,s],0〕+

如果[d==0=2=2(d==1=1=3=3)& &(y= 0×i),

b〔2,y=0,n-1,x,马克斯〔y-1, 0〕,w,s+1〕,0〕+

如果[d==0=3=3(d==1=1=4=4)& &(w=0×i),

b〔3,w=0,n-1,x+1,y,马克斯〔W-1, 0〕,S〕,0〕+

如果[d==0=4=4(d==1=1=3=3)& &(s=0×i),

B〔4,S=0,N-1,X,Y+1,W,马克斯〔S-1, 0〕〕,0〕

a [n]:=b〔0,真,n,0, 0, 0,0〕;

A/@范围[0, 30 ](*)让弗兰9月22日2019后阿洛伊斯·P·海因茨*)

交叉裁判

囊性纤维变性。A191756A191757.

语境中的顺序:A10246 A191828 A06161*A038 A05997 A1000

相邻序列:A191755 A191756 A191757*A191759 A191760 A191761

关键词

诺恩步行

作者

阿洛伊斯·P·海因茨6月15日2011

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改1月22日22:16 EST 2020。包含331166个序列。(在OEIS4上运行)