A115710 - OEIS

%I #4 Mar 03 2013 09:36:19

%S 4,9,10,46,94,121,169,526,961,982,1042,1273,1405,1843,4069,4633,5221,

%T 6313,6511,6937,9235,9481,9886,10201,10609,12538,12769,14023,16171,

%U 16327,16582,16723,18085,18463,18811,40219,42817,42931,44353,44521

%N Semiprimes (A001358) whose digit reversal is a square.

%e 46=2*23 is semiprime and 64=8^2.

%t Select[Range[50000],PrimeOmega[#]==2&&IntegerQ[Sqrt[FromDigits[ Reverse[ IntegerDigits[ #]]]]]&] (* _Harvey P. Dale_, Mar 03 2013 *)

%Y Cf. A001358, A115711.

%K nonn,base

%O 1,1

%A _Giovanni Resta_, Jan 31 2006