A183874 - OEIS

%I #13 Sep 08 2022 08:45:55

%S 2,3,5,6,7,9,10,11,12,13,15,16,17,18,19,20,22,23,24,25,26,27,28,30,31,

%T 32,33,34,35,36,37,38,40,41,42,43,44,45,46,47,48,49,51,52,53,54,55,56,

%U 57,58,59,60,61,63,64,65,66,67,68,69,70,71,72,73,74,75,77,78,79,80,81,82,83,84,85,86,87,88,89,90,92,93,94,95,96,97,98,99,100,101,102,103,104,105,106,108,109,110,111,112

%N a(n) = n + floor(sqrt(3*n/2)). Complement of A183857.

%H Robert Israel, <a href="/A183874/b183874.txt">Table of n, a(n) for n = 1..10000</a>

%p seq(n+floor(sqrt(3*n/2)),n=1..100); # _Robert Israel_, Nov 01 2016

%t a=3/2; b=0;

%t Table[n+Floor[(a*n+b)^(1/2)],{n,100}]

%t Table[n-1+Ceiling[(n*n-b)/a],{n,80}]

%o (Magma) [n+Floor(Sqrt(3*n/2)): n in [1..120]]; // _Vincenzo Librandi_, Nov 02 2016

%Y Cf. A183857.

%K nonn,easy

%O 1,1

%A _Clark Kimberling_, Jan 07 2011