%I#9 2014年10月18日07:36:20
%S 0,1,2,3,4,5,6,7,8,9,10,11,13,15,16,17,18,20,21,22,23,25,26,27,28,29,
%电话:30,33,40,41,42,43,44,45,46,47,48,49,50,53,55,56,57,60,63,66,67,70,73,
%U 77,80,83,85,86,87,88,90,91,93,95,96,97,98,99100110
%十进制表示的N个数字,在波兰语中,它们的数字是按字母顺序排列的。
%C十进制数字列表,按波兰语名称的字母顺序排序:
%C_4_捷克,2_德瓦/德维,9_德齐耶维奇,1_杰登/杰德纳/杰德诺,8_奥西姆,5_皮契奇,6_塞希奇,7_西德姆,3_ trzy,0_零;
%C a(1134871)=A247810(1023)=4291856730是不包含任何重复数字的最大项。
%H Reinhard Zumkeller,n的表,n=1..10000的a(n)</a>
%H维基百科,<a href=“http://de.wikipedia.org/wiki/Zahlen_in_unterschiedlichen_Sprachen#0_bis_10“>Zahlen在unteschiedlichen Sprachen</a>
%H维基百科,<a href=“http://en.wikipedia.org/wiki/List_of_numbers_in_various_languages网站“>各种语言的数字列表</a>
%o(哈斯克尔)
%o导入数据。IntSet(fromList,deleteFindMin,union)
%o a247760 n=a247760_列表!!(n-1)
%o a247760_list=0:f(fromList[1..9]),其中
%o f s=x:f(s’’并集`
%o来自列表(map(+10*x)$dropWhile(/=mod x 10)digs)
%o其中(x,s')=deleteFindMin s
%o数字=[4,2,9,1,8,5,6,7,3,0]
%Y参见A247810(续)。
%Y参见A247750(捷克语)、A247751(丹麦语)、A2 47752(荷兰语)、A053432(英语)、A 247753(芬兰语),A 247754(法语)、A 27755(德语)、A 147756(匈牙利语)、A 47757(意大利语)、B 247758(拉丁语)、C 247759(挪威语)、D 247757(葡萄牙语)、R 24761(俄语)、C 2762(斯洛伐克语)、M 161390(西班牙语)、C 347759(瑞典语)、S 24764(土耳其语)。
%K nonn,base,单词
%氧1,3
%A _Reinhard Zumkeller,2014年10月5日
|