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 A095284 #12 Mar 03 2015 01:02:17 %S A095284 127,191,223,239,251,383,479,503,509,751,863,887,983,991,1013,1019, %T A095284 1021,1279,1471,1531,1663,1759,1783,1787,1789,1951,1979,1999,2011, %U A095284 2027,2029,2039,2543,2551,2557,2687,2879,2927,2939,2999,3023,3037 %N A095284 Primes in whose binary expansion the number of 1 bits is > 5 + number of 0 bits. %H A095284 A. Karttunen and J. Moyer: <a href="/A095062/a095062.c.txt">C-program for computing the initial terms of this sequence</a> %o A095284 (PARI) B(x) = { nB = floor(log(x)/log(2)); b1 = 0; b0 = 0; %o A095284 for(i = 0, nB, if(bittest(x,i), b1++;, b0++;); ); %o A095284 if(b1 > (5+b0), return(1);, return(0););}; %o A095284 forprime(x = 31, 3037, if(B(x), print1(x, ", "); ); ); %o A095284 \\ _Washington Bomfim_, Jan 12 2011 %Y A095284 Complement of A095285 in A000040. Subset of A095322. Subset: A095312. Cf. also A095286, A095294. %K A095284 nonn,base %O A095284 1,1 %A A095284 _Antti Karttunen_, Jun 04 2004