1,2
方法B=‘数字’——指示后接‘频率’。
莱因哈德·祖姆凯勒,n=1..24的n,a(n)表
E、 g.1321之后的术语是通过说“1次,2次,3次,1次”得到的,即11213111。
A022481号[1] :=1;A022481号[注意]:=A022481号[n] =FromDigits[Flatten[{First[#],长度[#]}&/@Split[Reverse[IntegerDigits][A022481号[n-1]]]]]];地图[A022481号,范围[15]](*彼得·J·C·摩西2013年4月22日*)
a[1]=1;a[n[U]:=a[n]=FromDigits[REPLAN[REPLA[REPLA[REPLA[REPLA[REPLA[SPLI[REVER[INTERGEDIGITS[a[n[n-1]]]],{x×x,y{{x,y}}{x,x,y}},{1}],{1},{x{x,y y,z}}{x,长度{y y,y,z}}]}{1{1{1{1{x{x{x{x{x{x{x{x},{1}]]];数组[a,15](*伊万·N·伊纳基耶夫2017年6月22日*)
&{1@35digits@@第一个数字&@@第1个(*迈克尔·德维列格2017年6月26日*)
(哈斯克尔)
导入数据。列表(分组,转置)
a022481 n=a022481_列表!!(n-1)
a022481_list=1:f[1]::[Integer]其中
f xs=(读取$concatMap show ys):fys where
ys=concat$转置[映射头zss,映射长度zss]
zss=反向$group xs
--莱因哈德·祖姆凯勒2014年1月26日
囊性纤维变性。A022488号,A022514,A022515型,A022516,A022517,A022518型,A022519,A022520型.
上下文顺序:邮编:A121808 邮编:A160265 A007651号*邮编:A156338 邮编:A272817 邮编:A262282
相邻序列:A022478号 A022479号 A022480型*A022482号 A022483号 A022484号
不,基础,容易的,美好的
克拉克·金伯利
经核准的