login
A155512
Emirps with digits 0 and 1 only.
4
10011101, 10111001, 100100111, 111001001, 1000110101, 1001001011, 1010001101, 1010011111, 1010110001, 1011000101, 1101001001, 1111100101, 10010100101, 10100000011, 10100000111, 10100101001, 10111001011, 11000000101
OFFSET
1,1
COMMENTS
Subsequence of A128390 and of A020449.
LINKS
MATHEMATICA
emQ[ls_List]:=Module[{rev=Reverse[ls]}, Length[ls]==Length[rev]&& ls!=rev && PrimeQ[FromDigits[ls]]&&PrimeQ[FromDigits[rev]]]; Union[Flatten[ Table[FromDigits/@Select[Tuples[{1, 0}, n], emQ], {n, 11}]]] (* Harvey P. Dale, Nov 30 2011 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Lekraj Beedassy, Jan 23 2009
EXTENSIONS
First two missed entries included. Lekraj Beedassy, May 30 2009
More terms from Sean A. Irvine, Mar 04 2010
STATUS
approved