|
|
A004637
|
|
Cubes written in base 7.
|
|
1
|
|
|
1, 11, 36, 121, 236, 426, 1000, 1331, 2061, 2626, 3611, 5016, 6256, 11000, 12561, 14641, 20216, 23001, 25666, 32216, 36000, 43021, 50321, 55206, 63361, 102146, 111246, 121000, 131051, 141501, 152566, 164351, 206526, 222406, 236000, 253011, 300451, 315656, 334641
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
FromDigits[IntegerDigits[#, 7]]&/@(Range[40]^3) (* Harvey P. Dale, Feb 24 2013 *)
Table[FromDigits[IntegerDigits[n^3, 7]], {n, 40}] (* Vincenzo Librandi, Oct 15 2015 *)
|
|
PROG
|
(PARI) for(n=1, 40, print1(fromdigits(digits(n^3, 7)), ", ")) \\ G. C. Greubel, Sep 10 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|