|
|
A239459
|
|
Concatenation of n^3 and n.
|
|
6
|
|
|
11, 82, 273, 644, 1255, 2166, 3437, 5128, 7299, 100010, 133111, 172812, 219713, 274414, 337515, 409616, 491317, 583218, 685919, 800020, 926121, 1064822, 1216723, 1382424, 1562525, 1757626, 1968327, 2195228, 2438929, 2700030, 2979131, 3276832, 3593733
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
a(n) is divisible by n.
|
|
LINKS
|
|
|
EXAMPLE
|
a(13) = 219713 because 2197 = 13^3 and 13 = 13^1.
|
|
MATHEMATICA
|
Table[ToExpression[ToString[n^3]<>ToString[n]], {n, 1, 30}] (* Vaclav Kotesovec, Mar 24 2014 *)
Table[n^3*10^IntegerLength[n]+n, {n, 40}] (* Harvey P. Dale, Sep 07 2020 *)
|
|
PROG
|
(PARI) vector(100, n, eval(Str(n^3, n)))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|