login
A014187
Cubes of palindromes.
1
0, 1, 8, 27, 64, 125, 216, 343, 512, 729, 1331, 10648, 35937, 85184, 166375, 287496, 456533, 681472, 970299, 1030301, 1367631, 1771561, 2248091, 2803221, 3442951, 4173281, 5000211, 5929741, 6967871
OFFSET
0,3
MATHEMATICA
Select[Range[0, 200], PalindromeQ]^3 (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 02 2017 *)
CROSSREFS
Sequence in context: A062292 A030295 A052045 * A050750 A100571 A125084
KEYWORD
nonn,base
AUTHOR
STATUS
approved