|
|
|
|
1, 2, 2, 3, 3, 5, 8, 11, 13, 19, 28, 42, 60, 88, 123, 176, 252, 371, 531, 768, 1091, 1581, 2256, 3262, 4685, 6818, 9755, 14167, 20321, 29465, 42275, 61280, 88082, 127736, 183613, 266012, 382840, 554373
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
命令(第1行)=(1)。对于n>=2,第n行由按递增顺序生成的数字组成,如下所示:第n-1行中每个x的x+1和第n-1列中每个非零x的-2/x,其中重复出现时将被删除。第n行中的数字为A243927型(n) ●●●●。推测:每个有理数在数组中只出现一次。
|
|
链接
|
|
|
例子
|
理性数组的前7行:
1/1
-2/1 ... 2/1
-1/1 ... 3/1
-2/3 ... 0/1 ... 4/1
-1/2 ... 1/3 ... 5/1
-6/1 ... -2/5 .. 1/2 ... 4/3。。。6/1
-5/1 ... -4/1 .. -3/2 .. -1/3 .. 3/5 .. 3/2 .. 7/3 .. 7/1,因此A243927型分别为1,2,2,3,5,8。
|
|
数学
|
z=20;g[1]={1};f1[x_]:=x+1;f2[x]:=-2/x;h[1]=g[1];
b[n_]:=b[n]=删除重复项[Union[f1[g[n-1]],f2[g[n-1]]];
h[n_]:=h[n]=并集[h[n-1],g[n-1]];
g[n]:=g[n]=补码[b[n],交集[b[n],h[n]];g[5]=删除[g[5],4];表[长度[g[n]],{n,1,z}](*A243927型*)
|
|
交叉参考
|
|
|
关键词
|
非n,容易的
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|