login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A058738 a(n) = floor(n*exp(n)). 4
0, 2, 14, 60, 218, 742, 2420, 7676, 23847, 72927, 220264, 658615, 1953057, 5751374, 16836459, 49035260, 142177768, 410634196, 1181879444, 3391163718, 9703303908, 27695130424, 78868082614, 224130479263, 635738931116, 1800122483434 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

Harry J. Smith, Table of n, a(n) for n = 0..200

MATHEMATICA

lst={}; Do[AppendTo[lst, IntegerPart[n*E^n]], {n, 0, 5!}]; lst (* Vladimir Joseph Stephan Orlovsky, Sep 18 2008 *)

Table[Floor[n Exp[n]], {n, 0, 30}] (* Bruno Berselli, Jan 10 2015 *)

PROG

(PARI) { default(realprecision, 1000); for (n=0, 200, write("b058738.txt", n, " ", floor(n*exp(n))); ); } \\ Harry J. Smith, Jun 23 2009

CROSSREFS

Sequence in context: A285153 A232370 A174704 * A095376 A153332 A331822

Adjacent sequences:  A058735 A058736 A058737 * A058739 A058740 A058741

KEYWORD

nonn

AUTHOR

N. J. A. Sloane, Jan 01 2001

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 10 02:02 EDT 2020. Contains 336365 sequences. (Running on oeis4.)