login
A057853
Number of letters in n (in Esperanto).
1
3, 3, 2, 3, 4, 4, 3, 3, 2, 3, 3, 6, 5, 6, 7, 7, 6, 6, 5, 6, 5, 8, 7, 8, 9, 9, 8, 8, 7, 8, 6, 9, 8, 9, 10, 10, 9, 9, 8, 9, 7, 10, 9, 10, 11, 11, 10, 10, 9, 10, 7, 10, 9, 10, 11, 11, 10, 10, 9, 10, 6, 9, 8, 9, 10, 10, 9, 9, 8, 9, 6, 9, 8, 9, 10, 10, 9, 9, 8, 9, 5, 8, 7, 8, 9, 9, 8, 8, 7, 8, 6, 9, 8, 9
OFFSET
0,1
EXAMPLE
0 = nul; 1 = unu; 2 = du; 3 = tri; 4 = kvar; 5 = kvin; 6 = ses; 7 = sep; 8 = ok; 9 = naĆ­; 10 = dek; ...
a(2 002 002 026) = 34: "du miliardoj du milionoj du mil dudek ses".
PROG
(PARI) a(n)= my(b=strsplit("nul unu du tri kvar kvin ses sep ok nau", " "), c=["dek", "cent"], d=strsplit("mil miliono miliardo biliono", " "), s=if(n%10 || !n, b[n%10+1], ""), t=n\10, v=0); while(t, v++; s=strjoin([if(t%10>1, b[t%10+1], ""), if(v%3 && t%10, c[v%3], ""), if(!(v%3) && v\3 && t%10, d[v\3], ""), if(!(v%3) && v>5 && t%10>1, "j", ""), s]); t\=10); #Str(s); \\ Ruud H.G. van Tol, May 04 2026
CROSSREFS
Sequence in context: A244540 A337682 A276585 * A240088 A261735 A129309
KEYWORD
easy,nice,nonn,word
AUTHOR
Stewart Gordon, Nov 11 2000
STATUS
approved