A154766 Numbers k with exactly one even decimal digit in prime(k).

1, 9, 10, 13, 14, 15, 18, 19, 23, 24, 26, 27, 28, 29, 31, 35, 38, 39, 42, 47, 51, 52, 54, 55, 58, 59, 62, 63, 69, 70, 73, 76, 77, 81, 83, 84, 85, 88, 92, 94, 95, 96, 97, 98, 99, 100, 101, 103, 104, 107, 112, 113, 114, 115, 119, 120, 122, 123, 125, 126, 127, 129, 132, 135

Offset

1,2

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Formula

A154758(n) = prime(a(n)). - R. J. Mathar, May 05 2010

Mathematica

Select[Range[150], Count[IntegerDigits[Prime[#]], _?EvenQ]==1&] (* Harvey P. Dale, Jun 09 2025 *)

Crossrefs

Sequence in context: A037408 A178680 A178679 * A116594 A249723 A050593

Adjacent sequences: A154763 A154764 A154765 * A154767 A154768 A154769

Keyword

nonn,base,less

Author

Juri-Stepan Gerasimov, Jan 15 2009

Extensions

Corrected (26 to 29 inserted etc aligned with corrections of A154758) by R. J. Mathar, May 05 2010

Status

approved