登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志


提示
(问候来自整数序列在线百科全书!)
A022518型 从右边描述上一项(方法B—初始项为7)。 2
71117111711171211221221221221221221221221221221221221221221221221221221221221221221221221221221212212122121211122122231221212212121212212121221212212122121221232121321 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

0,1

评论

方法B=‘数字’——指示后接‘频率’。

链接

莱因哈德·祖姆凯勒,n=0..21的n,a(n)表

例子

1171之后的术语是通过说“1次,7次,1次2次”得到的,即117112。

数学

split[n_u]:=拆分[反转[整数位数[n]];

列表1[n_u]:=列表/@Length/@split[n];riffle1[n_u]:=Riffle[split[n],列表1[n]];

tab[n_x]:=表[i,{i,1,2*长度[list1[n]],2}];

列表2[n#]:=Append[riffle1[n][[#]],riffle1[n][[#+1]]&/@tab[n];

平坦[n_u]:=扁平/@list2[n];riffle2[n_u]:=Riffle[第一个/@flat[n],最后一个/@flat[n]];

a[1]=7;a[n_u]:=FromDigits[riffle2[a[n-1]]];数组[a,10](*或*)

a[1]=7;a[n_u]:=FromDigits[Flatten[Replace[Replace[Replace[Split[Reverse[IntegerDigits][

a[n-1]]],{x,y}->{x,长度[{x,y}]},{1}],{x,y,z}->{x,y,z}]},{1},{1},{x}->{x,长度[{x}]]]];数组[a,10](*伊万·N·伊纳基耶夫2016年10月7日*)

黄体脂酮素

(哈斯克尔)

导入数据。列表(分组,转置)

a022518 n=a022518\U列表!!n

a022518_list=7:f[7]::[Integer]其中

$atsys=show concys(显示地图)

ys=concat$转置[映射头zss,映射长度zss]

zss=反向$group xs

--莱因哈德·祖姆凯勒2014年1月26日

交叉引用

囊性纤维变性。A022481号,A022488号,A022514,A022515型,A022516,A022517,A051229号,A022520型.

上下文顺序:A052390号 A002119号 邮编:A146752*A113053号 A218384号 A022503号

相邻序列:A022515型 A022516 A022517*A051229号 A022520型 A022521

关键字

,基础,容易的,美好的

作者

N、 斯隆

扩展

更多条款来自埃里希·弗里德曼

第8学期修正帕特里克·德盖斯特1999年6月15日

状态

经核准的

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

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

上次修改日期:美国东部时间2020年10月24日07:04。包含337975个序列。(运行在oeis4上。)