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

 

标志
提示
(问候来自整数序列在线百科全书!)
搜索: a022343-编号:a022343
显示找到的38个结果中的1-10个。 页码12 4
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A191455号 (地板(n*e)),对角分布。 +10个
41
1、2、3、5、8、4、13、21、10、6、35、57、27、16、7、95、154、73、43、19、9、258、418、198、116、51、24、11、701、1136、538、315、138、65、29、12、1905、3087、1462、856、375、176、78、32、14、5178、8391、3974、2326、1019、478、212、86、38、15、14075、22809 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

背景讨论:假设s是一个递增的正整数序列,s的补码t是无穷大的,且t(1)=1。s的离散度是第n行为(t(n)、s(t(n))、s(s(t(n))、s(s(s(t(n)),…)。每个正整数在D中只出现一次,因此,作为一个序列,D是正整数的置换。由u(n)=(包含n的D的行数)给出的序列u是一个分形序列。示例:

(1) s=A000040号(素数),D=A114537号,美国=A114538号.

(2) s=A022343号(无首字母0),D=A035513号(Wythoff阵列),u=A003603.

(3) s=A007067号,D=A035506号斯托基阵列),拉苏=A133299号.

最近的分散示例:A191426号-A191455号.

链接

n=1..57的n,a(n)表。

例子

西北角:

1…2…5…13…35

3…8…21…57…154

4…10…27…73…198

6…16…43…116…315

7…19…51…138…375

枫木

A191455号:=过程(r,c)

选项记忆;

如果c=1,则

        A054385号(r) ;

其他

        A022843号(procname(r,c-1));

结束if;

结束过程:#R、 J.马萨2015年1月25日

数学

(*程序生成递增序列f[n]*的色散阵列T)

r=40;r1=12;c=40;c1=12;

f[n_u]:=楼层[n*E](*第1列的补足*)

mex[list\:=nestwiler[#1+1&,1,Union[list][[#1]]<=#1&,1,Length[Union[list]]]

rows={NestList[f,1,c]};

Do[rows=Append[rows,NestList[f,mex[Flatten[rows]],r]],{r}];

t[i,jü]:=行[[i,j]];

TableForm[表[t[i,j],{i,1,10},{j,1,10}]]

(*A191455号数组*)

展平[表格[t[k,n-k+1],{n,1,c1},{k,1,n}]](*A191455号序列*)

(*程序由彼得·J·C·摩西2011年6月1日*)

交叉引用

囊性纤维变性。A114537号,A035513号,A035506号.

关键字

,

作者

克拉克·金伯利2011年6月5日

状态

经核准的

A191452号 (4,8,12,16,…)的反对角线离散。 +10个
9
1、4、2、16、8、3、64、32、12、5、256、128、48、20、6、1024、512、192、80、24、7、4096、2048、768、320、96、28、9、16384、8192、3072、1280、384、112、36、10、65536、32768、12288、5120、1536、448、144、40、11、262144、131072、49152、20480、6144、1792、576 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

背景讨论:假设s是一个递增的正整数序列,s的补码t是无穷大的,且t(1)=1。s的离散度是第n行为(t(n)、s(t(n))、s(s(t(n))、s(s(s(t(n)),…)。每个正整数在D中只出现一次,因此,作为一个序列,D是正整数的置换。由u(n)=(包含n的D的行数)给出的序列u是一个分形序列。示例:

(1) s=A000040号(素数),D=A114537号,美国=A114538号.

(2) s=A022343号不带首字母D)=A035513号(Wythoff阵列),u=A003603.

(3) s=A007067号,D=A035506号(斯托拉斯基阵列)=A133299号.

最近的分散示例:A191426号-A191455号.

链接

伊万·内雷丁,n=1..5050的n,a(n)表(前100个对角线,变平)

例子

西北角:

1…4…16…64…256

2…8…32…128…512

3…12…48…192…768

5…20…80…320…1280

6…24…96…384…1536

数学

(*程序生成递增序列f[n]*的色散阵列T)

r=40;r1=12;c=40;c1=12;

f[n_x]:=4n(*第1列的补码*)

mex[list\:=nestwiler[#1+1&,1,Union[list][[#1]]<=#1&,1,Length[Union[list]]]

rows={NestList[f,1,c]};

Do[rows=Append[rows,NestList[f,mex[Flatten[rows]],r]],{r}];

t[i,jü]:=行[[i,j]];

TableForm[表[t[i,j],{i,1,10},{j,1,10}]]

(*A191452号数组*)

展平[表格[t[k,n-k+1],{n,1,c1},{k,1,n}]](*A191452号序列*)

(*程序由彼得·J·C·摩西2011年6月1日*)

交叉引用

囊性纤维变性。A114537号,A035513号,A035506号,A191449号.

关键字

,

作者

克拉克·金伯利2011年6月5日

状态

经核准的

A191449号 (3,6,9,12,15,…)的反对角线离散。 +10个
7
1、3、2、9、6、4、27、18、12、5、81、54、36、15、7、243、162、108、45、21、8、729、486、324、135、63、24、10、2187、1458、972、405、189、72、30、11、6561、4374、2916、1215、567、216、90、33、13、19683、13122、8748、3645、1701、648、270、99、39、14、59049 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

转置A141396号.

背景讨论:假设s是一个递增的正整数序列,s的补码t是无穷大的,且t(1)=1。s的离散度是第n行为(t(n)、s(t(n))、s(s(t(n))、s(s(s(t(n)),…)。每个正整数在D中只出现一次,因此,作为一个序列,D是正整数的置换。由u(n)=(包含n的D的行数)给出的序列u是一个分形序列。示例:

(1) s=A000040号(素数),D=A114537号,美国=A114538号.

(2) s=A022343号(无首字母0),D=A035513号(Wythoff阵列),u=A003603.

(3) s=A007067号,D=A035506号(斯托拉斯基阵列)=A133299号.

最近的分散示例:A191426号-A191455号.

链接

n=1..56的n,a(n)表。

公式

T(i,j)=T(i,1)*T(1,j)=楼层((3i-1)/2)*3^(j-1)。

例子

西北角:

1…3…9…27…81

2…6…18…54…162

4…12…36…108…324

5…15…45…135…405

7…21…63…189…567

数学

(*程序生成递增序列f[n]*的色散阵列T)

r=40;r1=12;c=40;c1=12;

f[n_x]:=3n(*第1列补足*)

mex[list\:=nestwiler[#1+1&,1,Union[list][[#1]]<=#1&,1,Length[Union[list]]]

rows={NestList[f,1,c]};

Do[rows=Append[rows,NestList[f,mex[Flatten[rows]],r]],{r}];

t[i,jü]:=行[[i,j]];

TableForm[表[t[i,j],{i,1,10},{j,1,10}]]

(*A191449号数组*)

展平[表格[t[k,n-k+1],{n,1,c1},{k,1,n}]](*A191449号序列*)

(*程序由彼得·J·C·摩西2011年6月1日*)

交叉引用

囊性纤维变性。A114537号,A035513号,A035506号,

A054582号:分散(2,4,6,8,…)。

A191450:分散(2,5,8,11,…)。

A191451号:分散(4,7,10,13,…)。

A191452号:分散(4,8,12,16,…)。

关键字

,

作者

克拉克·金伯利2011年6月5日

状态

经核准的

A191448号 大于1的奇整数的对角离差。 +10个
6
1、3、2、7、5、4、15、11、9、6、31、23、19、13、8、63、47、39、27、17、10、127、95、79、55、35、21、12、255、191、159、111、71、43、25、14、511、383、319、223、143、87、51、29、16、1023、767、639、447、287、175、103、59、33、18、2047、1535、1279、895、575 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

背景讨论:假设s是一个递增的正整数序列,s的补码t是无穷大的,且t(1)=1。s的离散度是第n行为(t(n)、s(t(n))、s(s(t(n))、s(s(s(t(n)),…)。正的整数序列D每出现一次。由u(n)=(包含n的D的行数)给出的序列u是一个分形序列。示例:

(1) s=A000040号(素数),D=A114537号,美国=A114538号.

(2) s=A022343号(无首字母0),D=A035513号(Wythoff阵列),u=A003603.

(3) s=A007067号,D=A035506号(斯托拉斯基阵列)=A133299号.

最近的分散示例:A191426号-A191455号.

链接

伊万·内雷丁,n=1..5050的n,a(n)表(前100个对角线,变平)

例子

西北角:

1…3…7…15…31

2…5…11…23…47

4…9…19…39…79

6…13…27…55…111

8…17…35…71…143

数学

(*程序生成递增序列f[n]*的色散阵列T)

r=40;r1=12;c=40;c1=12;

f[n_x]:=2n+1(*第1列的补码*)

mex[list\:=nestwiler[#1+1&,1,Union[list][[#1]]<=#1&,1,Length[Union[list]]]

rows={NestList[f,1,c]};

Do[rows=Append[rows,NestList[f,mex[Flatten[rows]],r]],{r}];

t[i,jü]:=行[[i,j]];

TableForm[表[t[i,j],{i,1,10},{j,1,10}]]

(*A191448号数组*)

展平[表格[t[k,n-k+1],{n,1,c1},{k,1,n}]](*A191448号序列*)

(*程序由彼得·J·C·摩西2011年6月1日*)

交叉引用

囊性纤维变性。A114537号,A035513号,A035506号.

关键字

,

作者

克拉克·金伯利2011年6月5日

状态

经核准的

A191545号 (地板(9n/4)),通过对角分布。 +10个
6
1、2、3、4、6、5、9、13、11、7、20、29、24、15、8、45、65、54、33、18、10、101、146、121、74、40、22、12、227、328、272、166、90、49、27、14、510、738、612、373、202、110、60、31、16、1147、1660、1377、839、454、247、135、69、36、17、2580、3735、3098、1887 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

背景讨论:假设s是一个递增的正整数序列,s的补码t是无穷大的,且t(1)=1。s的离散度是第n行为(t(n)、s(t(n))、s(s(t(n))、s(s(s(t(n)),…)。每个正整数在D中只出现一次,因此,作为一个序列,D是正整数的置换。由u(n)=(包含n的D的行数)给出的序列u是一个分形序列。示例:

(1) s=A000040号(准备好的)=A114537号,美国=A114538号.

(2) s=A022343号(无首字母0),D=A035513号(Wythoff阵列),u=A003603.

(3) s=A007067号,D=A035506号(斯托拉斯基阵列)=A133299号.

最近的分散示例:A191426号-A191455号.

链接

n=1..59的n,a(n)表。

例子

西北角:

1…2…4…9…20

3…6…13…29…65

5…11…25…54…121

7…15…33…74…166

8…18…40…90…202

数学

(*程序生成递增序列f[n]*的补码的色散阵列T)

r=40;r1=12;c=40;c1=12;f[n_x]:=楼层[9n/4]](*第1列的补充*)

mex[list\:=nestwiler[#1+1&,1,Union[list][[#1]]<=#1&,1,Length[Union[list]]]

rows={NestList[f,1,c]};

Do[rows=Append[rows,NestList[f,mex[Flatten[rows]],r]],{r}];

t[i,jü]:=行[[i,j]];

TableForm[表[t[i,j],{i,1,10},{j,1,10}]]

(*A191545号数组*)

展平[表格[t[k,n-k+1],{n,1,c1},{k,1,n}]](*A191545号序列*)

(*程序由彼得·J·C·摩西2011年6月1日*)

交叉引用

囊性纤维变性。A114537号,A035513号,A035506号.

关键字

,

作者

克拉克·金伯利2011年6月9日

状态

经核准的

邮编:A191438 ([n*sqrt(2)+n]),其中[]=底面,按对角线分布。 +10个
5
1、2、3、4、7、5、9、16、12、6、21、38、28、14、8、50、91、67、33、19、10、120、219、161、79、45、24、11、289、528、388、190、108、57、26、13、697、1274、936、458、260、137、62、31、15、1682、3075、2259、1105、627、330、149、74、36、17、4060、7423、5453 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

背景讨论:假设s是一个递增的正整数序列,s的补码t是无穷大的,且t(1)=1。s的离散度是第n行为(t(n)、s(t(n))、s(s(t(n))、s(s(s(t(n)),…)。每个正整数在D中只出现一次,因此,作为一个序列,D是正整数的置换。由u(n)=(包含n的D的行数)给出的序列u是一个分形序列。示例:

(1) s=A000040号(素数),D=A114537号,美国=A114538号.

(2) s=A022343号(无首字母0),D=A035513号(Wythoff阵列),u=A003603.

(3) s=A007067号,D=A035506号(斯托拉斯基阵列)=A133299号.

最近的分散示例:A191426号-A191455号.

链接

n=1..58的n,a(n)表。

例子

西北角:

1…..2….4….9….21

3…..7…16…38…91

5…..12…28…67…161

6…..14…33…79…190

8…..19…45…108.260

数学

(*程序生成递增序列f[n]*的色散阵列T)

r=40;r1=12;c=40;c1=12;x=平方米[2];

f[n_x]:=楼层[n*x+n](*第1列的补足*)

mex[list\:=nestwiler[#1+1&,1,Union[list][[#1]]<=#1&,1,Length[Union[list]]]

rows={NestList[f,1,c]};

Do[rows=Append[rows,NestList[f,mex[Flatten[rows]],r]],{r}];

t[i,jü]:=行[[i,j]];

TableForm[表[t[i,j],{i,1,10},{j,1,10}]]

(*邮编:A191438数组*)

展平[表格[t[k,n-k+1],{n,1,c1},{k,1,n}]](*邮编:A191438序列*)

(*程序由彼得·J·C·摩西2011年6月1日*)

交叉引用

囊性纤维变性。A114537号,A035513号,A035506号,邮编:A191438.

关键字

,

作者

克拉克·金伯利2011年6月4日

状态

经核准的

邮编:A191536 (3+层(n*sqrt(2)))的对角离散度。 +10个
5
1、4、2、8、5、3、14、10、7、6、22、17、12、11、9、34、27、19、18、15、13、51、41、29、28、24、21、16、75、60、44、42、36、32、25、20、109、87、65、62、53、48、38、31、23、157、126、94、90、77、70、56、46、35、26、225、181、135、130、111、101、82、68、52、39 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

背景讨论:假设s是一个递增的正整数序列,s的补码t是无穷大的,且t(1)=1。s的离散度是第n行为(t(n)、s(t(n))、s(s(t(n))、s(s(s(t(n)),…)。每个正整数在D中只出现一次,因此,作为一个序列,D是正整数的置换。由u(n)=(包含n的D的行数)给出的序列u是一个分形序列。示例:

(1) s=A000040号(素数),D=A114537号,美国=A114538号.

(2) s=A022343号不带首字母D)=A035513号(Wythoff阵列),u=A003603.

(3) s=A007067号,D=A035506号(斯托拉斯基阵列)=A133299号.

最近的分散示例:A191426号-A191455号邮编:A191536-A191545号.

链接

G、 C.格雷贝尔,前50行n,a(n)表,展平

例子

西北角:

1…4…8…14…22

2…5…10…17…27

3…7…12…19…29

6…11…18…28…42

9…15…24…36…54

数学

(*程序生成递增序列f[n]*的色散阵列T)

r=40;r1=12;c=40;c1=12;f[n_x]:=3+楼层[n*Sqrt[2]](*第1列的补充*)

mex[list\:=nestwiler[#1+1&,1,Union[list][[#1]]<=#1&,1,Length[Union[list]]]

rows={NestList[f,1,c]};

Do[rows=Append[rows,NestList[f,mex[Flatten[rows]],r]],{r}];

t[i,jü]:=行[[i,j]];

TableForm[表[t[i,j],{i,1,r1},{j,1,c1}]]

(*邮编:A191536数组*)

展平[表格[t[k,n-k+1],{n,1,c1},{k,1,n}]](*邮编:A191536序列*)

(*程序由彼得·J·C·摩西2011年6月1日*)

交叉引用

囊性纤维变性。A114537号,A035513号,A035506号.

关键字

,

作者

克拉克·金伯利2011年6月6日

状态

经核准的

A191442号 ([n*sqrt(3)+1/2]),其中[]=底面,按对角线分布。 +10个
4
1、2、4、3、7、6、5、12、10、8、9、21、17、14、11、16、36、29、24、19、13、28、62、50、42、33、23、15、48、107、87、73、57、40、26、18、83、185、151、126、99、69、45、31、20、144、320、262、218、171、120、78、54、35、22、249、554、454、378、296、208、135、94 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

背景讨论:假设s是一个递增的正整数序列,s的补码t是无穷大的,且t(1)=1。s的离散度是第n行为(t(n)、s(t(n))、s(s(t(n))、s(s(s(t(n)),…)。每个正整数在D中只出现一次,因此,作为一个序列,D是正整数的置换。由u(n)=(包含n的D的行数)给出的序列u是一个分形序列。示例:

(1) s=A000040号(素数),D=A114537号,美国=A114538号.

(2) s=A022343号(无首字母0),D=A035513号(Wythoff阵列),u=A003603.

(3) s=A007067号,D=A035506号(斯托拉斯基阵列)=A133299号.

最近的分散示例:A191426号-A191455号.

链接

n=1..63的n,a(n)表。

例子

西北角:

1….2….3….5…9

4…7…12…21…36

6…10…17…29…50

8…14…24…42…73

11…19…33…57…99

数学

(*程序生成递增序列f[n]*的色散阵列T)

r=40;r1=12;c=40;c1=12;x=平方米[3];

f[n_u]:=楼层[n*x+1/2](*第1列的补足*)

mex[list\:=nestwiler[#1+1&,1,Union[list][[#1]]<=#1&,1,Length[Union[list]]]

rows={NestList[f,1,c]};

Do[rows=Append[rows,NestList[f,mex[Flatten[rows]],r]],{r}];

t[i,jü]:=行[[i,j]];

TableForm[表[t[i,j],{i,1,10},{j,1,10}]]

(*A191442号数组*)

展平[表格[t[k,n-k+1],{n,1,c1},{k,1,n}]](*A191442号序列*)

(*程序由彼得·J·C·摩西2011年6月1日*)

交叉引用

囊性纤维变性。A114537号,A035513号,A035506号.

关键字

,

作者

克拉克·金伯利2011年6月4日

状态

经核准的

A191451号 n>=2时(3n-2)的对角离散度。 +10个
4
1、4、2、13、7、3、40、22、10、5、121、67、31、16、6、364、202、94、49、19、8、1093、607、283、148、58、25、9、3280、1822、850、445、175、76、28、11、9841、5467、2551、1336、526、229、85、34、12、29524、16402、7654、4009、1579、688、256、103、37、14、88573 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

第1行:A003462号

第2行:A060816号

背景讨论:假设s是一个递增的正整数序列,s的补码t是无穷大的,且t(1)=1。s的离散度是第n行为(t(n)、s(t(n))、s(s(t(n))、s(s(s(t(n)),…)。每个正整数在D中只出现一次,因此,作为一个序列,D是正整数的置换。由u(n)=(包含n的D的行数)给出的序列u是一个分形序列。示例:

(1) s=A000040号(素数),D=A114537号,美国=A114538号.

(2) s=A022343号(无首字母0),D=A035513号(Wythoff阵列),u=A003603.

(3) s=A007067号,D=A035506号(斯托拉斯基阵列)=A133299号.

最近的分散示例:A191426号-A191455号.

链接

n=1..56的n,a(n)表。

例子

西北角:

1…4…13…40…121

2…7…22…67…202

3…10…31…94…283

5…16…49…148…445

6…19…58…175…526

数学

(*程序生成递增序列f[n]*的色散阵列T)

r=40;r1=12;c=40;c1=12;

f[n_x]:=3n+1(*第1列补足*)

mex[list\:=nestwiler[#1+1&,1,Union[list][[#1]]<=#1&,1,Length[Union[list]]]

rows={NestList[f,1,c]};

Do[rows=Append[rows,NestList[f,mex[Flatten[rows]],r]],{r}];

t[i,jü]:=行[[i,j]];

TableForm[表[t[i,j],{i,1,10},{j,1,10}]]

(*A191451号数组*)

展平[表格[t[k,n-k+1],{n,1,c1},{k,1,n}]](*A191451号序列*)

(*程序由彼得·J·C·摩西2011年6月1日*)

交叉引用

囊性纤维变性。A114537号,A035513号,A035506号,A191449号.

关键字

,

作者

克拉克·金伯利2011年6月5日

状态

经核准的

A191429号 ([n*sqrt(2)+2]),其中[]=底面,按对角线分布。 +10个
2
1、3、2、2、6、4、5、10、7、9、8、16、11、14、13、12、24、17、21、20、20、18、15、35、26、31、30、27、23、19、51、38、45、44、40、34、28、22、74、55、65、64、55、65、64、58、50、41、33、25、106、79、93、92、92、84、72、59、48、37、29、151、113、133、132、132、120、103、85、85、69、54、43、32、215、161、190、188188、171、147、122、122、41、33、33、132、120、103、85、85、69、54、43、32、215、215、161、161、190 99、78、62、47、36 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

背景讨论:假设s是一个递增的正整数序列,s的补码t是无穷大的,且t(1)=1。s的离散度是第n行为(t(n)、s(t(n))、s(s(t(n))、s(s(s(t(n)),…)。每个正整数在D中只出现一次,因此,作为一个序列,D是正整数的置换。由u(n)=(包含n的D的行数)给出的序列u是一个分形序列。示例:

(1) s=A000040号(素数),D=A114537号,美国=A114538号.

(2) s=A022343号(无首字母0),D=A035513号(Wythoff阵列),u=A003603.

(3) s=A007067号,D=A035506号(斯托拉斯基阵列)=A133299号.

最近的分散示例:A191426号-A191455号.

链接

n=1..78的n,a(n)表。

例子

西北角:

1…3…6…10…16

2…4…7…11…17

5…9…14…21…31

8…13…20…30…44

12..18..27..40..58

数学

(*程序生成递增序列f[n]*的色散阵列T)

r=40;r1=12;(*r=#要计算的T行,r1=#要显示的行*)

c=40;c1=12;(*c=#要计算的列,c1=#要显示的列*)

x=Sqrt[2];

f[n_x]:=楼层[n*x+2](*f(n)是第1列*的补码)

mex[列表]:=

NestWhile[#1+1&,1,联合[list][[#1]]<=\1&,1,

长度[并集[列表]]]

rows={NestList[f,1,c]};

Do[rows=Append[rows,NestList[f,mex[Flatten[rows]],r]],{r}];

t[i,jü]:=行[[i,j]];(*阵列T*)

表格[

表[t[i,j],{i,1,10},{j,1,10}]](*A191429号数组*)

压平[桌子][

t[k,n-k+1],{n,1,c1},{k,1,n}]](*A191429号序列*)

(*程序由彼得·J·C·摩西2011年6月1日*)

交叉引用

囊性纤维变性。A114537号,A035513号,A035506号.

关键字

,

作者

克拉克·金伯利2011年6月3日

状态

经核准的

页码12 4

搜索在0.021秒内完成

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

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

上次修改日期:2022年10月6日08:17。包含357263个序列。(运行在oeis4上。)