|
|
A088655
|
|
a(n) is the absolute value of floor(x^n), where x=E/(2-E) = -3.784422... is derived from E=A001113.
|
|
1
|
|
|
4, 14, 55, 205, 777, 2937, 11118, 42072, 159220, 602554, 2280320, 8629690, 32658395, 123593159, 467728718, 1770083028, 6698741833, 25350868523, 95938394252, 363071406534, 1374015557281, 5199855228676, 19678448512407
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
digits=40 a = Table[Floor[Abs[(E/(2-E))^n]], {i, 1, digits}]
|
|
PROG
|
abs(floor((%e/(2-%e))^n))
)$
for n : 1 thru 20 do print(A088655(n)) ; /* R. J. Mathar, Feb 23 2012 */
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|