%I M0417#63 2024年3月4日01:23:49

%S 1,2,3,2,1,2,3,1,2,3,4,2,2,3,3,3,1,5,3,4,1,3,5,4,4,3,2,4,5,5,5，

%温度4,5,6,7,5,2,3,4,5,1,3,4,1,4,6,4,4,12,3,3,32,3,2,4,4,3,5,6，

%U 4,3,4,5,6,5,4,5，5,6，7,5,4，5,6,1,5,6

%N罗马数字表示N的字母数。

%C如何为大值定义此序列_Charles R Greathouse IV，2011年2月1日

%C关于罗马4M问题的讨论，请参见A078715_Reinhard Zumkeller，2013年4月14日

%C可以认为序列是通过公式定义的（如A055642 o A061493），因此问题将在A061492中提出，而不是在这里_M.F.Hasler，2015年1月12日

%D GCHQ，GCHQ拼图书，企鹅出版社，2016年。参见第60页。

%D网络新闻组rec.puzzles，常见问题解答文件。（科学科）。

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

%H Nathaniel Johnston，n的表，n的a（n）=1..3999</a>

%H Rec.puzzles，<a href=“http://www.rec-puzzles.org“>存档</a>

%H Gerard Schildberger，<a href=“/A006968/A006968.txt”>罗马数字中的前3999个数字</a>

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

%H维基百科，<a href=“http://en.wikipedia.org/wiki/Roman_numerals网站“>罗马数字</a>

%H<a href=“/index/Lc#letters”>索引与n中字母数相关的序列条目</a>

%F A006968=A055642 o A061493，即a（n）=A055622（A061492（n））_M.F.Hasler，2015年1月11日

%p A006968:=进程（n）返回长度（转换（n，罗马））：结束：seq（A006968（n），n=1..105）；#_纳撒尼尔·约翰斯顿，2011年5月18日

%t a[n_]：=字符串长度[IntegerString[n，“Roman”]]；表[a[n]，{n，1105}]（*_Jean-François Alcover_，2011年12月27日*）

%o（R）as.roman（1:1024）#_N.J.A.Sloane，2009年8月23日

%o（哈斯克尔）

%o a006968=lenRom 3，其中

%o透镜Rom 0 z=z

%o lenRom p z=[0,1,2,3,2,1,2,3,4]！！m+lenRom（p-1）z’

%o其中（z'，m）=divMod z 10

%o——Reinhard Zumkeller，2013年4月14日

%o（PARI）A006968（n）=#Str（A061493（n））\\_M.F.Hasler_，2015年1月11日

%o（Python）

%o定义f（s，k）：

%o如果k==4 else（s[1]*（k>=5）+s[0]*（k%5）如果k<9 else s[0]+s[2]），则返回s[：2]

%o定义a（n）：

%o m，c，x，i=n//1000，（n%1000）//100，（n%1100）//10，n%10

%o返回长度（“M”*M+f（“CDM”，c）+f（”XLC“，x）+f”（“IVX”，i））

%o打印（[a（n）代表范围（1101）中的n）]#_Michael S.Branicky_，2024年3月3日

%Y参见A002963、A036746、A036786、A036587、A03678、A061493、A092196、A160676、A160667、A199921。

%K nonn，基础，好，容易

%O 1,2号机组

%A _N.J.A.斯隆_

%E更多来自_Eric W.Weisstein的术语_