This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A007208 Number of letters in n (in German). (Formerly M3222) 7
 4, 4, 4, 4, 4, 4, 5, 6, 4, 4, 4, 3, 5, 8, 8, 8, 8, 8, 8, 8, 7, 13, 14, 14, 14, 14, 15, 16, 14, 14, 7, 13, 14, 14, 14, 14, 15, 16, 14, 14, 7, 13, 14, 14, 14, 14, 15, 16, 14, 14, 7, 13, 14, 14, 14, 14, 15, 16, 14, 14, 7, 13, 14, 14, 14, 14, 15, 16, 14, 14, 7 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,1 COMMENTS Standard German orthography; a letter with an umlaut or ß is counted as a single letter: e.g., 30 maps to length("dreißig") = 7. There are ambiguities from n=100 on, since both, "hundert" and "einhundert" are equally valid and common. The same applies for 1000 with "tausend" or "eintausend". - M. F. Hasler, Nov 03 2013 In contrast to English (A005589 vs A052360) and French (A007005 vs A167507), there are no spaces or other punctuation in German names for numbers, until 10^6 = "eine Million". - M. F. Hasler, Sep 20 2014 REFERENCES N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence). LINKS Wikipedia, Deutsch/Übersicht der Zahlen. PROG (PARI) /* Diacritics on umlauts are omitted and ß is represented by "B" because the GP interface cannot deal with these. The version below produces "einhundert" and "eintausend". The string "ein" can be replaced by "" in the last two lines to get "hundert" resp. "tausend". */ German(n, eins="eins")={n<20 && return(["null", eins, "zwei", "drei", "vier", "funf", "sechs", "sieben", "acht", "neun", "zehn", "elf", "zwolf", "dreizehn", "vierzehn", "funfzehn", "sechzehn", "siebzehn", "achtzehn", "neunzehn"][n+1]); n<100 && return(if(n%10, Str(German(n%10, "ein"), "und", German(n\10*10)), ["zwanzig", "dreiBig", "vierzig", "funfzig", "sechzig", "siebzig", "achtzig", "neunzig"][n\10-1])); n<1000 && return(if(n%100, Str(German(n\100*100), German(n%100)), Str(German(n\100, "ein"), "hundert"))); n<10^6 && return(if(n%1000, Str(German(n\1000*1000), German(n%1000)), Str(German(n\1000, "ein"), "tausend")))} A007208 = n -> #German(n) \\ M. F. Hasler, Nov 01 2013 CROSSREFS Cf. A005589 and A052360 (English analog). Cf. A007005 and A167507 (French analog). Sequence in context: A105682 A049109 A035651 * A165919 A035637 A001736 Adjacent sequences:  A007205 A007206 A007207 * A007209 A007210 A007211 KEYWORD nonn,word AUTHOR EXTENSIONS Corrected by Markus Stausberg (markus(AT)polomi.de), Aug 08 2004 Initial term a(0) = 4 = #"null" added by M. F. Hasler, Nov 01 2013 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 19 16:17 EDT 2019. Contains 328223 sequences. (Running on oeis4.)