%I #7 Jun 07 2021 14:41:24
%S 4,4,4,5,5,5,6,6,7,7,7,8,8,8,9,9,9,10,10,10,11,11,11,12,12,12,13,13,
%T 13,14,14,14,14,15,15,15,16,16,16,17,17,17,17,18,18,18,19,19,19,19,20,
%U 20,20,21,21,21,21,22,22,22,23,23,23,23,24,24,24,24,25,25,25,26,26,26,26,27,27
%N a(n) = round(3*n/2*log(n)).
%t Table[Round[(3n)/(2Log[n])],{n,2,80}] (* _Harvey P. Dale_, Aug 04 2017 *)
%K nonn
%O 2,1
%A _N. J. A. Sloane_, Feb 06 2008, following a suggestion of M. F. Hasler.