A110958 a(n) = floor(e^(n+1) - e^n) - Fibonacci(n).

1, 3, 11, 32, 90, 250, 685, 1871, 5101, 13889, 37792, 102791, 279514, 759957, 2066036, 5616483, 15267855, 41503419, 112819747, 306678713, 833643774, 2266086165, 6159872889, 16744290026, 45515730839, 123724635066, 336318509779, 914208627271, 2485076915041

Offset: 0

Author

Cino Hilliard, Sep 26 2005

Keywords

• nonn
• easy

Comments

The limit of the sums of the reciprocals = 1.472907750614494204850..

Crossrefs

Cf. A000045, A248873.

Programs

Mathematica

Table[Floor[Exp[n+1]-Exp[n]]-Fibonacci[n],{n,0,28}] (* James C. McMahon, Apr 25 2024 *)

PARI

e(n) = { sr=0; for(x=0, n, y=floor(exp(x+1)-exp(x))-fibonacci(x); print1(y","); sr+=1./y); print(); print(sr) }

Formula

a(n) = A248873(n) - A000045(n).