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 A052032 #16 Mar 21 2015 01:52:08
%S A052032 41,53,73,107,113,131,137,139,167,173,223,233,239,257,271,293,317,389,
%T A052032 401,467,491,509,521,557,593,641,661,691,701,739,761,809,827,829,839,
%U A052032 853,859,863,881,887,911,937,971,977,991,1013,1063,1109,1129,1151,1153
%N A052032 Primes base 10 that remain prime in one (and only one) other base b, 2<=b<10, expansions interpreted as decimal numbers.
%H A052032 Sebastian Petzelberger, <a href="/A052032/b052032.txt">Table of n, a(n) for n = 1..10000</a> [This replaces an earlier b-file computed by Harvey P. Dale]
%H A052032 C. Rivera, <a href="http://www.primepuzzles.net/puzzles/puzz_024.htm">PP&P Puzzle 24: Primes in several bases</a>
%t A052032 Select[Prime[Range[200]],Count[PrimeQ/@Table[FromDigits[ IntegerDigits[ #,i]],{i,2,9}],True]==1&] (* _Harvey P. Dale_, Oct 13 2012 *)
%Y A052032 Cf. A038537, A052026-A052033.
%K A052032 nonn,base
%O A052032 1,1
%A A052032 _Patrick De Geest_, Dec 15 1999
%E A052032 Definition clarified by _Harvey P. Dale_, Oct 13 2012