A154386 Primes such that number of prime digits < number of nonprime digits.

11, 19, 41, 61, 89, 101, 103, 107, 109, 113, 131, 139, 149, 151, 163, 167, 179, 181, 191, 193, 197, 199, 211, 241, 269, 281, 311, 349, 389, 401, 409, 419, 421, 431, 439, 443, 449, 461, 463, 467, 479, 487, 491, 499, 509, 541, 569, 599, 601, 607, 613, 617, 619

Offset

1,1

Comments

Intersection of A085558 and A000040. - Charles R Greathouse IV_, Mar 25 2010

Links

Table of n, a(n) for n=1..53.

Example

101 is prime, its nonprime digits are (1, 0, 1), and 0<3 so a(6)=101. 103 is prime, its prime digit is 3, its nonprime digits are (0, 1), and 1 < 2 so a(7)=103.

Maple

a := proc (n) local nn, s, j: nn := convert(n, base, 10): s := 0: for j to nops(nn) do if isprime(nn[j]) = false then s := s+1 else s := s-1 end if end do: if isprime(n) = true and 0 < s then n else end if end proc: seq(a(n), n = 1 .. 650); # Emeric Deutsch, Jan 28 2009

Crossrefs

Sequence in context: A167475 A136026 A033201 * A066738 A278799 A337508

Adjacent sequences: A154383 A154384 A154385 * A154387 A154388 A154389

Keyword

nonn,base,easy,less

Author

Juri-Stepan Gerasimov, Jan 08 2009

Status

approved