login
Partial sums of floor(e^n).
1

%I #6 Nov 21 2013 12:48:57

%S 1,3,10,30,84,232,635,1731,4711,12814,34840,94714,257468,699881,

%T 1902485,5171502,14057612,38212564,103872533,282354833,767520028,

%U 2086335762,5671248608,15416052054,41905174183,113910073520,309639682948

%N Partial sums of floor(e^n).

%C Primes in the sequence include a(1) = 3, a(19) = 282354833, no more through a(100) = 42525387036892760775526906833352845657512183.

%C The next prime in the sequence is a(1009) which has 438 digits. The one after that is a(3498) which has 1519 digits. [From Harvey P. Dale, Jul 18 2011]

%F a(n) = SUM[i=0..n] A000149(i). a(n) = SUM[i=0..n] floor(e^i).

%t Accumulate[Floor[E^Range[0,4000]]] (* _Harvey P. Dale_, Jul 18 2011 *)

%Y Cf. A000149.

%K easy,nonn

%O 0,2

%A _Jonathan Vos Post_, May 02 2006