|
%I #43 Feb 29 2020 12:53:50
%S 13,1,2,3,5,4,4,2,2,2,2,3,4,5,7,6,6,4,4,4,4,5,6,7,9,8,8,6,6,6,5,6,7,8,
%T 10,9,9,7,7,7,7,8,9,10,12,11,11,9,9,9,6,7,8,9,11,10,10,8,8,8,6,7,8,9,
%U 11,10,10,8,8,8,4,5,6,7,9,8,8,6,6,6,4,5,6,7,9,8,8,6,6,6,4,5,6,7,9,8,8,6,6,6,7
%N Number of strokes in Chinese characters for n; also number of strokes in Japanese kanji characters for n.
%C From _Benjamin M. Covert_, Oct 30 2018: (Start)
%C Numbers on the interval of n [200,299] use the "er" (二) form rather than the "liang" (两) form.
%C Numbers for n = 100m + c where m is a whole number and c is on the interval [1,9] have a "ling" (零) after the "bai" (百) adding 13 additional strokes. (End)
%H Hunter N. Ratliff, <a href="/A030166/b030166.txt">Table of n, a(n) for n = 0..20000</a> (first 301 terms from Benjamin M. Covert)
%H <a href="/index/Lc#letters">Index entries for sequences related to number of letters in n</a>
%e The Chinese number 15 (十五) takes 6 strokes to write so a(15) = 6
%o (Python)
%o from num2words import num2words
%o def A030166(n):
%o kanji=['一','二','三','四','五','六','七','八','九','十','百','千','万','億','兆','京','垓','秭','穣','溝','澗','正','載','極','零']
%o strokes=[1,2,3,5,4,4,2,2,2,2,6,3,3,15,6,8,9,10,18,13,15,5,13,12,13]
%o return sum([strokes[kanji.index(i)] for i in num2words(n, lang='ja')]) # _Hunter N. Ratliff_, Feb 29 2020
%K nonn,word
%O 0,1
%A _Yasutoshi Kohmoto_
%E Corrected by Robert Lozyniak (11(AT)onna.com), Oct 22 2001
%E More terms from _Naohiro Nomoto_, Oct 23 2001
%E Extended by _Benjamin M. Covert_, Oct 30 2018
|
