%I M0469#104 2022年12月1日17:47:16

%S 0,1,2,3,4,5,6,7,8,9,1,0,1,1,2,1,3,1,4,1,5,1,7,1,8,1,9,2,0,2,1，

%温度2,2,2,3,2,4,2,5,2,6,2,7,2,8,2,9,3,3,1,3,2,3,3,4,5,3,6,3,7,3,8，

%U 3,9,4,0,4,1,4,2,4,3,4,4,5,4,6,4,7,4,8,4,9,5,5,1,5,2,5,5,6,7

%N几乎是自然数：以10为基数写N，并列数字。

%C也称为Barbier无限词。

%这是一个非纯态序列的例子。

%Ca（n）=A162711（n，1）；A136414（n）=10*a（n）+a（n+1）.-_Reinhard Zumkeller，2009年7月11日

%C a（A031287（n））=0，a（A031.288（n）_Reinhard Zumkeller，2011年7月28日

%C可以被视为一个不规则表，其中第n行列出了2012年12月7日n.-_Jason Kimberley的数字

%C整数n的数字从索引A117804（n）开始。索引n处的数字a（n）属于数字A100470（n）_M.F.Hasler，2019年10月23日

%C另请参见科普兰-厄尔德常数A033308，等价于使用素数而不是所有数字_M.F.Hasler，2019年10月24日

%C和{k>=1}k/10^（A058183（k）+1）的十进制展开式_斯特凡诺·斯佩齐亚（Stefano Spezia），2022年11月30日

%D J.-P.Allouche和J.Shallit，《自动序列》，剑桥大学出版社，2003年，第114、336页。

%D R.Honsberger，《世界各地的数学栗子》，MAA，2001年；见第163页。

%D M.Kraitchik，《数学娱乐》。纽约州多佛市，第二版，1953年，第49页。

%D N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。

%H Robert G.Wilson v，n表，n=0..100000的a（n）（由M.F.Hasler_添加的a（0）=0，2019年10月23日）。

%H Putnam比赛第48号，<a href=“http://www.jstor.org/stable/2690046“>问题A2，数学杂志，61（1988），131-134。

%H R.G.Wilson v，致N.J.a.Sloane的信，1993年10月</a>

%p c：=proc（x，y）local s：s：=prog（m）nops（convert（m，base，10））end：如果y=0，那么10*x else x*10^s（y）+y：fi end：b：=proch（n）local nn：nn：=convertc连接2个数字，而b将数字转换为数字序列-德国数字，2006年7月27日

%p#备选方案

%p A007376:=过程（n）选项记忆；局部aprev，dOld，N；如果n<=9，则返回（[n，n，1]）；其他aprev:=A007376（n-1）；d旧：=op（3，aprev）；N:=op（2，aprev）；如果dOld＜A055642（N），则RETURN（[op（-dOld-1，convert（N，base，10）），N，dOld+1]）；else RETURN（[运算（-1，转换（N+1，基数，10）），N+1，1]）；fi；fi；结束日期：#R.J.Mathar_，2008年1月21日

%t展平[Integer Digits/@Range@57]（*或*）

%t几乎自然[n，b]：=块[{m=0，d=n，i=1，l，p}，而[m<=d，l=m；m=（b-1）i*b^（i-1）+l；i++]；i——；p=模态[d-l，i]；q=地板[（d-l）/i]+b^（i-1）；如果[p！=0，整数位数[q，b][p]]，Mod[q-1，b]]]；阵列[almostNatural[#，10]&，105]（*2014年6月29日更新*）

%t使用[{nn=120}，RealDigits[N[香槟编号[]，nn]，10，nn]][1]（*哈维·P·戴尔，2018年3月13日*）

%o（哈斯克尔）

%o a007376 n=a007376_列表！！（n-1）

%o a007376_list=concatMap（地图（read.return）。show）[0..]：：[Int]

%o--_Reinhard Zumkeller_，2013年11月11日，2011年12月17日，2011日3月28日

%o（PARI）表示（n=0,90，v=数字（n））；（i=1，#v，print1（v[i]“，”））\\_Charles R Greathouse IV_，2012年11月20日

%o（PARI）应用（A007376（n）={表示（k=1，n，k*10^k>n&&return（数字（n\k）[n%k+1]）；n+=10^k）}，[0..200]）\\_M.F.Hasler_，2019年11月3日

%o（Magma）和cat[Reverse（IntegerToSequence（n））：[0..31]]中的n；//_Jason Kimberley，2012年12月7日

%o（Python）A007376_list=[int（d）for n in range（10**2）for d in str（n）]#_Chai Wah Wu_，2015年2月4日

%Y作为一个数字序列，这与Champernowne常数A033307的十进制展开式相同。有关a（n）的公式、更多参考资料等，请参阅该条目。

%Y参见A054632（部分总和），A023103。

%Y有关“小数”，请参见A127050 A127353 A127414 A127508 A127584 A127734 A127994 A127950 A128178 A128211 A128359 A128423 A128475 A128881。

%Y参见A193428、A256100、A001477（非负整数）、A117804、A100470。

%Y表格，其中第n行列出n的基数b：A030190和A030302（b=2）、A003137和A054635（b=3）、P030373（b=4）、A031219（b=5）、A030548（b=6）、A030998（b=7）、A031035和A05463（b=8）、A041076（b=9）、此序列和A033307（b=10）。-_杰森·金伯利（Jason Kimberley），2012年12月6日

%A055642中的Y行长度。

%Y此处的素数见A071620。有关非常相似的序列，请参见A007908。

%Y参考A058183。

%K基础，简单，漂亮，无，塔夫

%0、3

%A _N.J.A.Sloane_，_Robert G.Wilson v_

%2019年10月23日，M.F.Hasler_将E扩展到a（0）=0