OFFSET
1,1
COMMENTS
Obtained by chopping the two most-significant bits off the associated A191235(n). - R. J. Mathar, Jun 03 2011
EXAMPLE
19 is in the sequence, because 19=10011_2 prefixed with 10_2 is 1010011_2 = 19+62=83 which still is prime.
MATHEMATICA
Select[Prime[Range[300]], PrimeQ[FromDigits[Join[{1, 0}, IntegerDigits[ #, 2]], 2]]&] (* Harvey P. Dale, Apr 11 2012 *)
CROSSREFS
KEYWORD
nonn,base,less
AUTHOR
Juri-Stepan Gerasimov, May 28 2011
EXTENSIONS
Corrected by R. J. Mathar, Jun 03 2011
STATUS
approved