This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A139119 #30 Apr 04 2019 03:06:46
%S A139119 2,37,149,599,153437,39279991,628479869,11056334789265976156021,
%T A139119 3263254052013454238294691704608897001027543,
%U A139119 7524551543123483484068003542235060639999919940760883731360687
%N A139119 Primes whose binary representation shows the distribution of prime numbers using "0" for primes and "1" for nonprime numbers.
%C A139119 Primes in A118255.
%C A139119 Primes whose binary representation is also the concatenation of the initial terms of A005171, the characteristic function of nonprimes. - _Omar E. Pol_, Oct 07 2013
%C A139119 a(11) is a 120-digit number 377859...798653. - _Robert Price_, Apr 03 2019
%t A139119 Select[Table[FromDigits[Boole /@ Not /@ PrimeQ /@ Range@k, 2], {k, 1, 100}], PrimeQ] (* _Federico Provvedi_, Oct 07 2013 *)
%o A139119 (PARI) f(n) = fromdigits(vector(n, k, !isprime(k)), 2); \\ A118255
%o A139119 lista(nn) = for (n=1, nn, if (isprime(p=f(n)), print1(p, ", "))); \\ _Michel Marcus_, Apr 04 2019
%Y A139119 Cf. A000040, A118255, A118256, A118257, A139101, A139102, A139103, A139104.
%K A139119 nonn,base
%O A139119 1,1
%A A139119 _Omar E. Pol_, Apr 11 2008
%E A139119 a(8)-a(10) from _Donovan Johnson_, Oct 07 2013