%I#90 2023年1月2日12:30:46

%S 0,1,2,3,4,5,6,7,8,9,11,12,13,14,15,16,17,18,19,22,23,24,25,26,27,28，

%电话：29、33、34、35、36、37、38、39、44、45、46、47、48、49、55、56、57、58、59、66、67、68、69，

%大学77,78,79,88,89,99111112113114115116117118119122

%N个数字按非递减顺序排列的数字。

%C记录A004185的值和出现次数。-_Reinhard Zumkeller_，2009年12月5日

%C A193581（a（n））=0.-_Reinhard Zumkeller，2011年8月10日

%C美国人口普查局（U.S.Bureau of the Census）在20世纪50年代中期使用此序列对一个州内按字母顺序排列的县进行数字编码（对德克萨斯州进行了一些修改）。这个3位数的代码内置了“自我监控元素”，“在检测2位数的移位方面相当有效”（Hanna 1959）_Randy A.Becker，2017年12月11日

%D Amarnath Murthy和Robert J.Clarke，《阶梯序列的一些性质》，《数学与信息季刊》，第11卷，第4期，2001年11月。

%D Frank A.Hanna，《制造业统计汇编》。美国商务部，人口普查局，1959年。

%H Seiichi Manyama，n表，n=1..100000的a（n）（Reinhard Zumkeller的术语1..1000）

%H David Applegate，Marc LeBrun，N.J.A.Sloane，<A href=“https://cs.uwaterloo.ca/journals/JIS/VOL14/Sloane/carry2.html“>Dismal Arithmetic</a>，J.Int.Seq.14（2011）#19.8。

%H David Radcliffe和Brendan McKay，<a href=“http://list.seqfan.eu/oldermail/seqfan/2019年7月/018891.html“>回复：A009994，SeqFan列表，2019年7月29日

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/Digit.html“>数字</a>

%H<a href=“/index/Ar#10-automatic”>为10-automatic序列的索引条目</a>。

%F a（n）>>经验（n^（1/10））_Charles R Greathouse IV，2014年3月15日

%F a（n）~10^（（9！n）^（1/9）-5），因为二项式（d+8，9）的10^（d-1）<=a（n！。使用ε=10/（3n）+o（1/n）可以得到更精确的估计。[继Radcliffe和McKay之后，参见SeqFan列表。]-M.F.Hasler_，2019年7月30日

%p A[0]：=[0]：A[1]：=[1..9]美元：

%p代表d从2到4 do

%p A[d]：=映射（t->seq（10*t+i，i=（t mod 10）。。9） ，A[d-1]）：

%操作说明：

%p序列（op（A[d]），d=0..4）；#_罗伯特·伊斯雷尔，2019年7月28日

%t选择[Range[0，125]，LessEqual@@IntegerDigits[#]&]（*_Ray Chandler_，2011年10月25日*）

%o（哈斯克尔）

%o导入数据。设置（fromList，deleteFindMin，insert）

%o a009994 n=a009994_列表！！n个

%o a009994_list=0:f（fromList[1..9]），其中

%o f s=m：f（foldl（翻转插入）s’$map（10*m+）[m`mod`10..9]）

%o其中（m，s'）=deleteFindMin s

%o--_Reinhard Zumkeller，2011年8月10日

%o（PARI）是（n）=n=数字（n）；n==vecsort（n）\\_Charles R Greathouse IV_，2013年12月3日

%o（Python）

%o从itertools导入组合with_replacement

%o定义A009994generator（）：

%o产量0

%o l=1

%o为True时：

%o对于组合s_with_replacement中的i（'123456789'，l）：

%o生成int（“.join（i））

%o l+=1#_Chai Wah Wu_，2015年11月11日

%o（岩浆）[0.122]中的k:k |排序（Intseq（k））eq反转（Intsez（k）]；//_Marius A.Burtea，2019年7月28日

%o（Scala）def hasDigitsSorted（n:Int）：布尔值={

%o val digSort=整数.parseInt（n.toString.toCharArray.sorted.mkString）

%o n==数字排序

%o}（o）

%o（0至200）.过滤器（hasDigitsSorted（_））//_Alonso del Arte_2020年4月20日

%Y除第一项外，A052382的子序列。A254143是一个子序列。

%Y参考A152054，A036839。

%K nonn，基础，看

%氧1,3

%A _N.J.A.斯隆_