|
|
A199921号 |
| 罗马数字数量<4000,包含n个字母。 |
|
4
|
|
|
7, 31, 93, 215, 389, 573, 691, 691, 573, 389, 215, 93, 31, 7, 1
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
注意,序列与长度为零的单个(概念上的)罗马字符串的添加完全对称-伊恩·达夫2017年6月27日
|
|
链接
|
|
|
例子
|
a(1)=7,因为有七个单字母罗马数字I、V、X、L、C、D、M。
a(15)=1,因为有一个十五个字母的罗马数字MMMDCCCLXXXVIII。
|
|
MAPLE公司
|
对于i从1到15 do L[i]:={}:od:对于n从1到3999 do L[长度(转换(n,罗马))]:={op(L[长度(转换(n,罗马))]),n};日期:
seq(nops(L[i]),i=1..15)#马丁·瑞诺2011年11月13日
|
|
数学
|
romanLetterCount=表[0,{15}];j=1;当[j<4000,romaLetterCount[[StringLength[IntegerString[j,“Roman”]]]++;j++];罗马字母计数(*阿隆索·德尔·阿特2011年11月12日*)
休息[BinCounts[StringLength[RomanNumeral[Range[3999]]]](*保罗·沙萨2024年3月19日*)
|
|
黄体脂酮素
|
(哈斯克尔)
导入数据。列表(分组、排序)
a199921 n=a199921_列表!!(n-1)
a199921_list=映射长度$group$sort$map(a055642.a061493)[1..3999]
|
|
交叉参考
|
|
|
关键词
|
非n,完成,满的
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|