A220102-OEIS公司

A220102年

应用平方螺旋行走产生的自然数排列（例如。A214526型)到双方形螺旋的数据（定义见A220098年).

1, 2, 4, 6, 8, 3, 5, 7, 9, 11, 13, 15, 17, 19, 21, 23, 25, 10, 12, 14, 16, 18, 20, 22, 24, 26, 28, 30, 32, 34, 36, 38, 40, 42, 44, 46, 48, 27, 29, 31, 33, 35, 37, 39, 41, 43, 45, 47, 49, 51, 53, 55, 57, 59, 61, 63, 65, 67, 69, 71, 73, 75, 77, 79, 81, 50, 52, 54, 56

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,2

链接

n=1..69时的n，a（n）表。

黄体脂酮素

（C）

#包括<stdio.h>

#定义尺寸20

int网格[SIZE][SIZE_]；

int方向[]={0，-1，1，0，0，1，-1，0}；

main（）{

整数i，j，x1，y1，x2，y2，步长大小；

int方向1pos=0，方向2pos=4，val；

x1=y1=x2=y2=尺寸/2；

对于（val=grid[y1][x1]=1，stepSize=0；；++stepSize）{

如果（x1<1||x1>=尺寸-1||x2<1|| x2>=尺寸-1）中断；

如果（y1<1||y1>=尺寸-1||y2<1|| y2>=尺寸-1）中断；

对于（i=stepSize|1；i；++val，--i）{

x1+=方向[方向1pos]；

y1+=方向[方向1pos+1]；

x2+=方向[方向2pos]；

y2+=方向[方向2pos+1]；

网格[y1][x1]=val*2；

网格[y2][x2]=val*2+1；

}

方向1pos=（方向1pos+2）&7；

方向2pos=（方向2pos+2）&7；

}

方向1pos=0；

x1=y1=尺寸/2；

用于（stepSize=2；；++stepSize）{

对于（i=步长/2；i；--i）{

如果（网格[y1][x1]==0）返回；

打印f（“%d，”，网格[y1][x1]）；

x1+=方向[方向1pos]；

y1+=方向[方向1pos+1]；

}

方向1pos=（方向1pos+2）&7；

}

交叉参考

囊性纤维变性。A214526型,A220098年,A217010型,A217011型,A217012型,A217013型,A217014型,A217015型.

上下文中的序列：A004093号 A106202号 A351330型*A308080型 A179657号 A239887型

相邻序列：A220099年 A220100型 A220101型*A220103年 2010年2月4日 2010年2月5日

关键词

非n

作者

亚历克斯·拉图什尼亚克2012年12月4日

状态

经核准的