%I #27 Jun 28 2024 05:26:40
%S 0,1,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,4,4,4,4,4,4,4,4,4,4,4,4,4,4,
%T 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,5,5,5,5,5,5,5,5,5,5,5,5,5,5,
%U 5,5,5,5,5,5,5,5,5,5,5,5,5
%N a(n) = ceiling(log(n)).
%C Does not satisfy Benford's law [Whyman et al., 2016]. - _N. J. A. Sloane_, Feb 12 2017
%H T. D. Noe, <a href="/A004233/b004233.txt">Table of n, a(n) for n = 1..10000</a>
%H G. Whyman, N. Ohtori, E. Shulzinger, and Ed. Bormashenko, <a href="https://doi.org/10.1016/j.physa.2016.06.054">Revisiting the Benford law: When the Benford-like distribution of leading digits in sets of numerical data is expectable?</a>, Physica A: Statistical Mechanics and its Applications, 461 (2016), 595-601.
%H <a href="/index/Be#Benford">Index entries for sequences related to Benford's law</a>
%t Ceiling[Log[Range[100]]] (* _Paolo Xausa_, Jun 28 2024 *)
%o (Haskell)
%o a004233 = ceiling . log . fromIntegral -- _Reinhard Zumkeller_, Mar 17 2015
%o (PARI) a(n)=ceil(log(n)) \\ _Charles R Greathouse IV_, Apr 29 2015
%Y Cf. A000193, A000195, A000523.
%K nonn
%O 1,3
%A _N. J. A. Sloane_