login
n+[nr/s]+[nt/s]; r=1, s=sqrt(e), t=e.
3

%I #6 Aug 20 2014 15:47:06

%S 2,6,8,12,16,18,22,25,28,32,35,38,41,45,48,51,55,57,61,64,67,71,73,77,

%T 81,83,87,90,93,97,100,103,107,110,113,116,120,123,126,129,132,136,

%U 139,142,146,148,152,156,158,162,165,168,172,175,178,181,184,188,191,194,197,201,204,207,211,214,217,221,223,227,231,233,237,240,243,247,249,253,256,259,263,266,269

%N n+[nr/s]+[nt/s]; r=1, s=sqrt(e), t=e.

%C (See A189399.)

%t (See A189399.)

%t Table[n+Floor[n/Sqrt[E]]+Floor[n*Sqrt[E]],{n,90}] (* _Harvey P. Dale_, Aug 20 2014 *)

%Y Cf. A189400, A189400, A189401, A189402, A189405.

%K nonn

%O 1,1

%A _Clark Kimberling_, Apr 21 2011