This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A087510 Primes consisting only of digits 0 and 1 occurring with equal frequency. 20
 10010101, 10100011, 1000011011, 1000110101, 1001000111, 1001001011, 1001010011, 1010000111, 1010001101, 1010010011, 1010100011, 1010110001, 1011000101, 1100001101, 1101001001, 10000101011101, 10000111100011 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS T. D. Noe, Table of n, a(n) for n=1..1000 MAPLE Primes consisting only of digits x and y, occurring with equal frequency. d1=x; d2=y; k=0; a=vector(100); for(n=1, 3000, B=binary(n); L=length(B); s=sum(j=1, length(B), B[j]); if(L%2==0 & s==L/2, C=vector(L, n, (d2-d1)*B[n]+d1); p=subst(Pol(C), x, 10); if(isprime(p), if(k<100, k++; a[k]=p)); D=vector(L, n, d2-(d2-d1)*B[n]); q=subst(Pol(D), x, 10); if(isprime(q ), if(k<100, k++; a[k]=q))); ); a=vector(k, n, a[n]); vecsort(a) MATHEMATICA Select[FromDigits/@Tuples[{0, 1}, 14], PrimeQ[#] && Length[x=IntegerDigits[#]]==2*Count[x, 0] &] (* Jayanta Basu, May 23 2013 *) CROSSREFS Cf. A087511, A087512, A087513. Sequence in context: A017647 A182749 A072144 * A173002 A139120 A210893 Adjacent sequences:  A087507 A087508 A087509 * A087511 A087512 A087513 KEYWORD base,nonn,changed AUTHOR Paul D. Hanna and Amarnath murthy (amarnath_murthy(AT)yahoo.com), Sep 11 2003 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified May 26 04:23 EDT 2013. Contains 225653 sequences.