%I A079270
%S A079270 25,36,2304,2377764,4682896,5934096,108175867801,1291266322921,
%T A079270 4261879482624,5201569683025,6562388864656,12317369371321,
%U A079270 52608547580625
%N A079270 Nonpalindromic squares n such that reverse(n) - n is a cube.
%e A079270 2304 is here since 4032-2304 = 1728 = 12^3.
%t A079270 r[n_] := FromDigits[Reverse[IntegerDigits[n]]]; PalindromicQ[n_] := (r[n] 
               == n); CubicQ[n_] := IntegerQ[n^(1/3)]; Do[k = n^2; If[ !PalindromicQ[k] 
               && CubicQ[r[k] - k], Print[k]], {n, 3, 10^8}] (Propper)
%Y A079270 Sequence in context: A167363 A035383 A061863 this_sequence A127022 A120148 
               A038516
%Y A079270 Adjacent sequences: A079267 A079268 A079269 this_sequence A079271 A079272 
               A079273
%K A079270 base,nonn
%O A079270 1,1
%A A079270 Jason Earls (zevi_35711(AT)yahoo.com), Feb 06 2003
%E A079270 More terms from Ryan Propper (rpropper(AT)stanford.edu), Aug 29 2005