|
Search: id:A113800
|
|
|
| A113800 |
|
Numbers n such that n^2 plus the reverse of n^2 gives a perfect power. |
|
+0
1
|
| |
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
451429^2 = 203788142041 and 203788142041+140241887302=7007^3,
9426681^2 = 88862314675761 and 88862314675761+16757641326888=10277157^2.
|
|
MATHEMATICA
|
ppQ[n_] := n != 1 && GCD @@ (Transpose[FactorInteger[n]][[2]]) > 1; rev[n_] := FromDigits@Reverse@IntegerDigits@n ; lst = {}; Do[If[ppQ[n^2 + rev[n^2]], AppendTo[lst, n]], {n, 10^6}]; lst
|
|
CROSSREFS
|
Sequence in context: A071225 A015968 A095220 this_sequence A066622 A012671 A012526
Adjacent sequences: A113797 A113798 A113799 this_sequence A113801 A113802 A113803
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Giovanni Resta (g.resta(AT)iit.cnr.it), Jan 22 2006
|
|
|
Search completed in 0.002 seconds
|
