A201217 Numbers such that (closest square) = (closest cube).

0, 1, 2, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 703, 704, 705, 706, 707, 708, 709, 710, 711, 712, 713, 714, 715, 716, 717, 718, 719, 720, 721, 722, 723, 724, 725, 726, 727, 728, 729, 730, 731, 732, 733, 734, 735, 736, 737, 738, 739

Offset

1,3

Comments

A061023(a(n)) = 0; A053187(a(n)) = A201053(a(n));

A001014 is a subsequence (6th powers).

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..6051

Prog

(Haskell)
import Data.List (elemIndices)
a201217 n = a201217_list !! (n-1)
a201217_list = elemIndices 0 a061023_list
-- Reinhard Zumkeller, Nov 28 2011

Crossrefs

Sequence in context: A080318 A002542 A264939 * A041391 A245783 A189057

Adjacent sequences: A201214 A201215 A201216 * A201218 A201219 A201220

Keyword

nonn

Author

Reinhard Zumkeller, Nov 28 2011

Status

approved