login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A007208 Number of letters in n (in German).
(Formerly M3222)
6
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

Table of n, a(n) for n=0..70.

Wikipedia, Deutsch/Übersicht der Zahlen.

Index entries for sequences related to number of letters in n

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

N. J. A. Sloane.

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 22 18:41 EST 2019. Contains 319365 sequences. (Running on oeis4.)