login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

[(1+e^n)/(1+e*n)], where [ ]=floor.
2

%I #4 Mar 30 2012 18:57:32

%S 1,1,2,4,10,23,54,131,318,781,1937,4841,12175,30791,78254,199721,

%T 511640,1315064,3390147,8762929,22705350,58960248,153411988,399903630,

%U 1044199306,2730780816,7151800337,18755305334,49246220422,129456991053,340682085365

%N [(1+e^n)/(1+e*n)], where [ ]=floor.

%t f[n_] := Floor[(1+E^n)/(1+E*n)]

%t Table[f[n], {n, 1, 40}] (* A191693 *)

%Y Cf. A191692.

%K nonn

%O 1,3

%A _Clark Kimberling_, Jun 11 2011