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 A115668 #5 Nov 21 2013 12:48:47
%S A115668 4,9,10,121,169,961,1273,1843,10201,10609,12769,16171,44521,48361,
%T A115668 48613,94249,96721,106009,108853,121879,129307,445051,526567,613927,
%U A115668 1026169,1042441,1062961,1216609,1442401,1692601
%N A115668 Brilliant numbers (A078972) whose digit reversal is a square.
%e A115668 1843=19*97 is brilliant and 3481=59^2 is a square.
%t A115668 brilQ[n_]:=Module[{fin=FactorInteger[n]},Total[Transpose[fin][[2]]]==2&& Length[Union[IntegerLength[Transpose[fin][[1]]]]]==1]
%t A115668 brilnos=Select[Range[1700000],brilQ];
%t A115668 Select[brilnos,IntegerQ[Sqrt[FromDigits[Reverse[IntegerDigits[#]]]]]&] (* _Harvey P. Dale_, Feb 06 2011 *)
%Y A115668 Cf. A078972, A115667, A115669.
%K A115668 nonn,base
%O A115668 1,1
%A A115668 _Giovanni Resta_, Jan 31 2006