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 A323067 #13 Jan 10 2019 16:20:57
%S A323067 2,3,7,11,31,47,59,127,191,239,251,367,827,1019,1471,1723,2011,2939,
%T A323067 4079,4091,4591,6427,7867,8191,10607,11483,12539,13679,13883,14447,
%U A323067 14783,14939,15227,15359,16127,16187,16319,18367,26683,27583,28411,29167,29851,32191
%N A323067 Primes whose binary complement (A035327) is a square.
%t A323067 Select[Prime@ Range[10^4], IntegerQ@ Sqrt@ FromDigits[IntegerDigits[#, 2] /. {0 -> 1, 1 -> 0}, 2] &] (* _Michael De Vlieger_, Jan 04 2019 *)
%o A323067 (PARI) bc(n) = bitxor(n, 2^(1+logint(max(n, 1), 2))-1); \\ A035327
%o A323067 isok(n) = isprime(n) && issquare(bc(n)); \\ _Michel Marcus_, Jan 04 2019
%Y A323067 Cf. A000040, A035327, A000290, A323066.
%K A323067 nonn,base
%O A323067 1,1
%A A323067 _Alex Ratushnyak_, Jan 03 2019