A183868 - OEIS

%I #14 Jan 21 2019 20:05:42

%S 3,5,7,8,9,11,12,14,15,16,17,19,20,21,23,24,25,26,27,29,30,31,32,34,

%T 35,36,37,38,39,41,42,43,44,45,47,48,49,50,51,52,53,55,56,57,58,59,60,

%U 62,63,64,65,66,67,68,69,71,72,73,74

%N a(n) = n + floor(2*sqrt(n+1)); complement of A079524.

%p A183868 := proc(n) n+floor(2*sqrt(n+1)) ; end proc: # _R. J. Mathar_, Feb 06 2011

%t Table[n+Floor[2*Sqrt[n+1]],{n,60}] (* _Harvey P. Dale_, Nov 05 2013 *)

%Y Cf. A079524.

%K nonn,easy

%O 1,1

%A _Clark Kimberling_, Jan 07 2011