A004165 Cubes written backwards.

1, 8, 72, 46, 521, 612, 343, 215, 927, 1, 1331, 8271, 7912, 4472, 5733, 6904, 3194, 2385, 9586, 8, 1629, 84601, 76121, 42831, 52651, 67571, 38691, 25912, 98342, 72, 19792, 86723, 73953, 40393, 57824, 65664, 35605, 27845, 91395, 46, 12986, 88047, 70597, 48158

Offset: 1

Author

N. J. A. Sloane

Keywords

• nonn
• base

Links

• Michael S. Branicky, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Vincenzo Librandi)

Crossrefs

Cf. A000578 (cubes), A004086 (n written backwards).

Cf. A002942 (squares written backwards).

Programs

Maple

a:= n-> (s-> parse(cat(s[-i]$i=1..length(s))))(""||(n^3)):
seq(a(n), n=1..60);  # Alois P. Heinz, May 20 2022

Mathematica

Table[FromDigits[Reverse[IntegerDigits[n^3]]], {n, 1, 50}] (* Vincenzo Librandi, Aug 27 2013 *)
IntegerReverse[Range[50]^3] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 23 2019 *)

PARI

a(n) = fromdigits(Vecrev(digits(n^3))); \\ Michel Marcus, Jun 04 2019

Python

def a(n): return int(str(n**3)[::-1])
print([a(n) for n in range(1, 45)]) # Michael S. Branicky, May 24 2022

Formula

a(n) = A004086(A000578(n)). - Michel Marcus, Jun 04 2019

Extensions

More terms from Jeremy Gardiner, Sep 08 2002