login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A145464 Cubes ending in a square. 2
0, 1, 64, 125, 216, 729, 1000, 1331, 2744, 4096, 6859, 8000, 9261, 13824, 15625, 17576, 24389, 27000, 29791, 39304, 46656, 59319, 64000, 68921, 85184, 91125, 97336, 117649, 125000, 132651, 157464, 175616, 205379, 216000, 226981, 262144, 274625, 328509, 343000 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,3
COMMENTS
Cube and ending square may be equal.
LINKS
MAPLE
q:= n-> (s-> ormap(x-> issqr(parse(x)),
[s[i..-1]$i=1..length(s)]))(""||n):
select(q, [i^3$i=0..120])[]; # Alois P. Heinz, Mar 16 2020
MATHEMATICA
eisQ[n_]:=AnyTrue[NestWhileList[FromDigits[Rest[IntegerDigits[ #]]]&, n, #> 9&], IntegerQ[ Sqrt[ #]]&]; Select[Range[0, 70]^3, eisQ] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 04 2020 *)
CROSSREFS
Cf. A038678 squares ending in a (different) square.
Sequence in context: A357390 A195678 A029777 * A215558 A324487 A258001
KEYWORD
base,nonn
AUTHOR
Zak Seidov, Oct 11 2008
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 04:23 EDT 2024. Contains 371264 sequences. (Running on oeis4.)