A192295 - OEIS

%I #19 Feb 16 2020 01:00:28

%S 2,1,2,3,2,2,2,3,3,1,2,3,4,4,4,3,4,4,4,2,4,4,4,6,6,6,6,6,6,4,4,5,5,4,

%T 5,6,6,7,5,5,4,5,5,5,4,5,6,7,6,5,3,4,4,5,4,4,5,6,5,4,4,5,5,6,6,6,4,6,

%U 6,5,5,5,6,7,7,6,6,5,7,5,4,5,5,5,6,6,6,7,4,5,3,3,4,5,5,5,5,5,5,3,4,4,6,5,5

%N Number of distinct consonants in the English name of n.

%C First differs from A037195 at the ninth term.

%C The letter "y" is here considered a consonant regardless of its usage in the word(s).

%C The maximum number of distinct vowels that can occur in the English name of n is 5, which occurs for n in A058179. - _Jonathan Vos Post_, Jul 12 2011

%H Michael De Vlieger, <a href="/A192295/b192295.txt">Table of n, a(n) for n = 0..10000</a>

%e a(13) = 4 because the distinct consonants present in THIRTEEN are T, H, R and N.

%e a(9) = 1 because N is the only consonant present in NINE.

%t Array[Length@ Union@ Select[Characters@ IntegerName@ #, And[LetterQ@ #, FreeQ[{97, 101, 105, 111, 117}, ToCharacterCode[#][[1]]]] &] &, 105, 0] (* _Michael De Vlieger_, Feb 15 2020 *)

%Y Cf. A037195, A037196 (number of vowels in n), A058179 (numbers whose English names include all five vowels at least once).

%K dumb,easy,nonn,word

%O 0,1

%A _Kausthub Gudipati_, Jun 27 2011

%E More terms from _Michael De Vlieger_, Feb 15 2020