%I#42 2022年7月27日02:44:23

%S 10,11,12,13,14,15,16,17,18,191110,2111211131111511161117，

%电话1118111912101211,2212131214121151216121712181913101311，

%电话：1312,231314113151616131313181319141041141313,2414151416141417

%N描述N.也称为“说出你所看到的”或“看和说”序列LS（N）。

%C a（1111111111）=a（（10^10-1）/9）=101是第一个具有奇数位数的项；三位数术语是明确的，但第二个四位数术语已经是LS（12）=1112=LS（2*（10^111-1）/9）（“百点十一2”）。对于某些k<n，使LS（n）=LS（k）的最小n（即，使LS对[0..n-1]的限制是内射的最大n）似乎是10*（10^11-1）/9:LS（十一个‘1’，一个‘0’）=11110=LS（一个‘1'，十一个‘0'）_M.F.Hasler，2006年11月14日

%C A121993给出了数字m，使得a（m）<m.-Reinhard Zumkeller_，2014年1月25日

%D J.H.Conway，《听觉衰变的奇怪而奇妙的化学》，收录于T.M.Cover和Gopinath编辑的《通信和计算中的开放问题》，纽约州施普林格，1987年，第173-188页。

%H Reinhard Zumkeller，n的表，n=0..10000的a（n）</a>

%H Kevin Watkins，<a href=“http://www.cs.cmu.edu/~kw/pubs/conway.pdf“>利用懒惰进行抽象解释：证明conway丢失的宇宙学定理</a>

%H Kevin Watkins，<a href=“http://www.cs.cmu.edu/~kw/pubs/conwayslides.pdf“>证明康威遗失的宇宙学定理，POP研讨会讲座，CMU，2006年12月</a>

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/LookandSaySequence.html“>看和说序列</a>

%H维基百科，<a href=“http://en.wikipedia.org/wiki/Look-and-say_sequence“>看说话序列</a>

%e 23有“1 2，1 3”，因此a（23）=1213。

%p LS:=n->如果n>9，则LS（op（convert（n，base，10）））else for i from 2 to nargs do if args[i]<>n，则返回（（LS（args[i.nargs]）*10^长度（i-1）+i-1）*10+n）fiod:10*nargs+n fi；#_M.F.Hasler，2006年11月14日

%t LookAndSayA[n_]：=FromDigits@Flatten@IntegerDigits@Flatten[Through[{Length，First}[#]]&/@Split@Integer Digits@@]（*_Robert G.Wilson v_，2012年1月27日*）

%o（PARI）A045918（a）={my（c=1）；对于（j=2，#a=Vec（Str（a

%o（Haskell）见Watkins链接，第3页。

%o导入数据。列表（展开器、组）；导入数据。元组（交换）

%o a045918 0=10

%o a045918 n=折叠（\v d->10*v+d）0$say$reverse$unwrapper

%o（\x->如果x==0，则无其他内容，仅$swap$divMod x 10）n

%o其中say=concat。地图代码。组

%o代码xs=[toInteger$length xs，head xs]

%o——Reinhard Zumkeller，2012年8月9日

%o（Python）

%o来自重新导入finditer

%o定义A045918（n）：

%o返回int（“”.join（[str（len（m.group（0）））+m.group

%o#_Chai Wah Wu，2014年12月3日

%o（Python）

%o从itertools导入groupby

%o定义LS（n）：返回int（“.join（str（len（list（g）））+k代表k，g代表groupby（str）））

%o打印（[LS（n）代表范围（48）内的n）]#_Michael S.Branicky_，2022年7月27日

%Y参考A005150。另请参见A056815。

%K nonn，基础

%0、1

%A _N.J.A.斯隆_

%E从A056815添加了Mma程序_N.J.A.Sloane，2012年2月2日