|
%I #22 Sep 08 2022 08:46:02
%S 4,7,11,14,17,20,24,27,30,33,36,39,42,45,48,51,54,57,61,64,67,70,73,
%T 76,79,82,85,88,91,94,97,100,103,106,109,112,115,118,121,124,127,130,
%U 133,136,139,142,145,148,151,155,158,161,164,167,170,173,176,179
%N a(n) = floor(3n + log(3n)).
%H Vincenzo Librandi, <a href="/A212447/b212447.txt">Table of n, a(n) for n = 1..1000</a>
%t Table[Floor[3*n + Log[3*n]], {n, 100}] (* _T. D. Noe_, May 21 2012 *)
%o (Magma) [Floor(3*n + Log(3*n)): n in [1..80]]; // _Vincenzo Librandi_, Feb 15 2013
%o (PARI) a(n)=3*n+log(3*n)\1 \\ _Charles R Greathouse IV_, Sep 04 2015
%Y Cf. A000523, A062153, A102572, A212445, A212446, A212448, A212449, A212450, A212451, A212452, A212453, A212454.
%K nonn,easy
%O 1,1
%A _Mohammad K. Azarian_, May 17 2012
|
