%I#12 2019年10月6日16:54:48

%S 9，91119111911221129112211291，211221112212211191211221，

%电话：11221221119113221122122111221222311291122112212，

%电话：2111221222311212112312311221321

%N从右边描述上一个术语（方法B-初始术语为9）。

%C方法B=“数字”-指示后面跟着“频率”。

%H Reinhard Zumkeller，<a href=“/A022520/b022520.txt”>n的表，a（n）表示n=0..21</a>

%e 1191之后的术语通过“1一次，9一次，1两次”获得，即得出119112。

%o（哈斯克尔）

%o导入数据。列表（组，转置）

%o a022520 n=a022520_列表！！n个

%o a022520_list=9:f[9]：：[Integer]其中

%o f xs=（读取$concatMap show ys）：f ys其中

%o ys=concat$转置[map head zss，map length zss]

%o zss=反向$group xs

%o——Reinhard Zumkeller，2014年1月26日

%Y参见A022481、A022488、A022514-A022519。

%K nonn，基础，简单，好

%0、1

%A _N.J.A.斯隆_

%E更多术语摘自Patrick De Geest，1999年6月15日