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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A154758 Primes with one even digit. 2

%I

%S 2,23,29,41,43,47,61,67,83,89,101,103,107,109,127,149,163,167,181,211,

%T 233,239,251,257,271,277,293,307,347,349,367,383,389,419,431,433,439,

%U 457,479,491,499,503,509,521,523,541,547,563,569,587,613,617,619,631

%N Primes with one even digit.

%H Charles R Greathouse IV, <a href="/A154758/b154758.txt">Table of n, a(n) for n = 1..10000</a>

%t Select[Prime[Range[150]], Length[Select[IntegerDigits[#], EvenQ]] == 1&] (* _Harvey P. Dale_, Jan 04 2011 *)

%o (PARI) is(n)=my(d=digits(n)); sum(i=1,#d,d[i]%2==0)==1 && isprime(n) \\ _Charles R Greathouse IV_, Feb 15 2017

%K nonn,base

%O 1,1

%A _Juri-Stepan Gerasimov_, Jan 15 2009

%E Corrected (101 to 109 inserted, 307 inserted, 401 and 409 removed etc.) by _R. J. Mathar_, May 05 2010

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 September 19 11:06 EDT 2019. Contains 327192 sequences. (Running on oeis4.)