登录
A022481号
从右边描述上一个术语(方法B-初始术语为1)。
11
1, 11, 12, 2111, 1321, 11213111, 1331112112, 211221133211, 12213212221221, 11221123112131112211, 122213311121123121122212, 211123122111312112211332112311
抵消
1,2
评论
方法B=“数字”-指示后接“频率”。
链接
莱因哈德·祖姆凯勒(Reinhard Zumkeller),n=1..24时的n,a(n)表
例子
例如,1321年之后的术语是通过“1一次,2一次,3一次,1一次”获得的,即11213111。
数学
A022481号[1]:=1;A022481号[编号]:=A022481号[n] =FromDigits[Flatten[{First[#],Length[#]}和/@Split[Reverse[IntegerDigits[A022481号[n-1]]]]];地图[A022481号,范围[15]](*彼得·J·C·摩西,2013年4月22日*)
a[1]=1;a[n_]:=a[n]=FromDigits[Flatten[Replace[Replace[Split[Reverse[IntegerDigits[a[n-1]]],{x_,y_}->{x,Length[{x,y}]},{1}],{x_,y_,z_}->{x,Longth[},y,z}]}],{x}->{x,长度[{x}]},{1}]];数组[a,15](*伊万·伊纳基耶夫2017年6月22日*)
NestList[FromDigits@Flatten@Reverse@Map[{First@#,Length@#}&,Split@IntegerDigits@@]&,1,11](*迈克尔·德弗利格2017年6月26日*)
黄体脂酮素
(哈斯克尔)
导入数据。列表(组,转置)
a022481 n=a022481_列表!!(n-1)
a022481_list=1:f[1]::[Integer]其中
f xs=(读取$concatMap show ys):f ys其中
ys=concat$转置[map head zss,map length zss]
zss=反转$group xs
--莱因哈德·祖姆凯勒2014年1月26日
关键词
非n,基础,容易的,美好的
状态
经核准的