login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A079270 Nonpalindromic squares k such that reverse(k) - k is a cube. 0
25, 36, 2304, 2377764, 4682896, 5934096, 108175867801, 1291266322921, 4261879482624, 5201569683025, 6562388864656, 12317369371321, 52608547580625, 6743107419013476, 8805764114375089, 40069631076696004, 96968830866886969 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..17.

EXAMPLE

2304 is here since 4032 - 2304 = 1728 = 12^3.

MATHEMATICA

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}] (* Ryan Propper, Aug 29 2005 *)

Select[Range[3114*10^5]^2, !PalindromeQ[#]&&IntegerQ[Surd[ IntegerReverse[ #]- #, 3]]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Feb 29 2020 *)

CROSSREFS

Sequence in context: A035383 A179803 A061863 * A253025 A127022 A253018

Adjacent sequences:  A079267 A079268 A079269 * A079271 A079272 A079273

KEYWORD

base,nonn

AUTHOR

Jason Earls, Feb 06 2003

EXTENSIONS

More terms from Ryan Propper, Aug 29 2005

a(14)-a(17) from Donovan Johnson, Mar 06 2011

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 28 13:13 EDT 2021. Contains 348329 sequences. (Running on oeis4.)