|
| |
|
|
A004165
|
|
Cubes written backwards.
|
|
3
|
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
|
|
|
MAPLE
|
P:=proc(i) local a, b, c, n; for n from 1 by 1 to i do a:=evalf(floor(log10(n^3)+1)); b:=n^3; c:=0; while a>0 do c:=c+(b-(trunc(b/10)*10))*10^(a-1); b:=trunc(b/10); a:=a-1; od; print(c); od; end: P(100); # Paolo P. Lava, Aug 07 2008
|
|
|
MATHEMATICA
|
Table[FromDigits[Reverse[IntegerDigits[n^3]]], {n, 1, 50}] (* Vincenzo Librandi, Aug 27 2013 *)
|
|
|
CROSSREFS
|
Sequence in context: A203008 A235128 A226163 * A032554 A097255 A115693
Adjacent sequences: A004162 A004163 A004164 * A004166 A004167 A004168
|
|
|
KEYWORD
|
nonn,base
|
|
|
AUTHOR
|
N. J. A. Sloane.
|
|
|
EXTENSIONS
|
More terms from Jeremy Gardiner, Sep 08 2002
|
|
|
STATUS
|
approved
|
| |
|
|
