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 A115663 #4 Jun 08 2013 09:05:51
%S A115663 41,53,109,137,163,193,307,317,349,397,773,977,997,1051,1093,1171,
%T A115663 1297,1307,1451,1553,1621,1721,1801,1861,1951,3001,3041,3323,3331,
%U A115663 3361,3461,3491,3593,3631,3671,3673,3701,3923,7001,7151,7213,7283
%N A115663 Prime numbers whose digit reversal is a brilliant number (A078972).
%e A115663 997 is prime and 799=17*47 is brilliant.
%t A115663 brilQ[n_]:=Module[{fin=FactorInteger[n]},Total[Transpose[fin][[2]]]==2 && Length[Union[IntegerLength[Transpose[fin][[1]]]]]==1]; Select[Prime[ Range[1000]],brilQ[FromDigits[Reverse[IntegerDigits[#]]]]&] (* _Harvey P. Dale_, Jun 08 2013 *)
%Y A115663 Cf. A078972, A115664.
%K A115663 nonn,base
%O A115663 1,1
%A A115663 _Giovanni Resta_, Jan 31 2006