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 A052028 #13 Mar 21 2015 01:54:16 %S A052028 157,523,1249,1483,1753,4051,9187,10531,22921,25981,29599,35899,51031, %T A052028 57751,67579,79939,98323,103561,110581,148471,150193,150343,249703, %U A052028 259183,277063,278623,331081,335833,353401,391903,424819,435553,504547 %N A052028 Primes base 10 that remain primes in six bases b, 2<=b<=10, expansions interpreted as decimal numbers. %H A052028 Sebastian Petzelberger, <a href="/A052028/b052028.txt">Table of n, a(n) for n = 1..10000</a> %H A052028 C. Rivera, <a href="http://www.primepuzzles.net/puzzles/puzz_024.htm">PP&P Puzzle 24: Primes in several bases</a> %t A052028 Select[Prime[Range@ 42000], Count[PrimeQ /@ Table[FromDigits[IntegerDigits[#, i]], {i, 2, 10}], True] == 6 &] (* _Michael De Vlieger_, Mar 20 2015, after _Harvey P. Dale_ at A052032 *) %Y A052028 Cf. A038537, A052026-A052033. %K A052028 nonn,base %O A052028 1,1 %A A052028 _Patrick De Geest_, Dec 15 1999