A191245 Primes that remain prime if the bit pattern 10 is attached as the most-significant bits to their binary representation.

3, 7, 11, 19, 53, 97, 103, 127, 131, 149, 179, 197, 227, 239, 277, 283, 337, 349, 409, 457, 463, 487, 499, 569, 599, 641, 659, 683, 701, 719, 743, 809, 839, 953, 971, 1013, 1019, 1051, 1093, 1201, 1213, 1237, 1291, 1297, 1303, 1321, 1381, 1423, 1543, 1597, 1621, 1747, 1753, 1783, 1801

Offset: 1

Author

Juri-Stepan Gerasimov, May 28 2011

Keywords

• nonn
• base
• less

Comments

Obtained by chopping the two most-significant bits off the associated A191235(n). - R. J. Mathar, Jun 03 2011

Examples

			19 is in the sequence, because 19=10011_2 prefixed with 10_2 is 1010011_2 = 19+62=83 which still is prime.
		

Crossrefs

Cf. A004676, A191235.

Programs

Mathematica

Select[Prime[Range[300]],PrimeQ[FromDigits[Join[{1,0},IntegerDigits[ #,2]],2]]&] (* Harvey P. Dale, Apr 11 2012 *)

Extensions

Corrected by R. J. Mathar, Jun 03 2011