login
A115663
Prime numbers whose digit reversal is a brilliant number (A078972).
1
41, 53, 109, 137, 163, 193, 307, 317, 349, 397, 773, 977, 997, 1051, 1093, 1171, 1297, 1307, 1451, 1553, 1621, 1721, 1801, 1861, 1951, 3001, 3041, 3323, 3331, 3361, 3461, 3491, 3593, 3631, 3671, 3673, 3701, 3923, 7001, 7151, 7213, 7283
OFFSET
1,1
EXAMPLE
997 is prime and 799=17*47 is brilliant.
MATHEMATICA
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 *)
CROSSREFS
Sequence in context: A168348 A052032 A176924 * A367421 A282353 A118636
KEYWORD
nonn,base
AUTHOR
Giovanni Resta, Jan 31 2006
STATUS
approved