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 A052033 #14 Mar 21 2015 01:51:33 %S A052033 263,269,347,397,431,461,479,499,569,599,607,677,683,719,769,797,821, %T A052033 929,941,1019,1031,1049,1051,1061,1069,1103,1181,1223,1229,1237,1297, %U A052033 1307,1367,1399,1409,1439,1453,1487,1489,1523,1553,1559,1571,1619,1637 %N A052033 Primes base 10 that are never primes in any smaller base b, 2<=b<10, expansions interpreted as decimal numbers. %H A052033 Sebastian Petzelberger, <a href="/A052033/b052033.txt">Table of n, a(n) for n = 1..10000</a> %H A052033 C. Rivera, <a href="http://www.primepuzzles.net/puzzles/puzz_024.htm">PP&P Puzzle 24: Primes in several bases</a> %t A052033 Select[Prime[Range@ 265], Count[PrimeQ /@ Table[FromDigits[IntegerDigits[#, i]], {i, 2, 9}], True] == 0 &] (* _Michael De Vlieger_, Mar 20 2015 after _Harvey P. Dale_ at A052032 *) %Y A052033 Cf. A038537, A052026-A052033, A236174, A236437, A235354, A235377. %K A052033 nonn,base %O A052033 1,1 %A A052033 _Patrick De Geest_, Dec 15 1999