login
A004165
Cubes written backwards.
6
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,2
LINKS
Michael S. Branicky, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Vincenzo Librandi)
FORMULA
a(n) = A004086(A000578(n)). - Michel Marcus, Jun 04 2019
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 *)
PROG
(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
CROSSREFS
Cf. A000578 (cubes), A004086 (n written backwards).
Cf. A002942 (squares written backwards).
Sequence in context: A235128 A226163 A338622 * A376609 A032554 A097255
KEYWORD
nonn,base
EXTENSIONS
More terms from Jeremy Gardiner, Sep 08 2002
STATUS
approved