A008553 Numbers whose American English name contains the letter 'y'.
20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85
Offset: 1
Links
- Paolo Xausa, Table of n, a(n) for n = 1..10000
- Tanya Khovanova, Non Recursions
Programs
-
Mathematica
A008553Q[n_]:=StringContainsQ[IntegerName[n,"Words"],"y"];Select[Range[0,200],A008553Q] (* Paolo Xausa, Aug 12 2023 *)
Extensions
Name edited by Paolo Xausa, Aug 12 2023