A138195 a(n) = floor(8*n/(5*log(n))).

4, 4, 4, 4, 5, 5, 6, 6, 6, 7, 7, 8, 8, 8, 9, 9, 9, 10, 10, 11, 11, 11, 12, 12, 12, 13, 13, 13, 14, 14, 14, 15, 15, 15, 16, 16, 16, 17, 17, 17, 17, 18, 18, 18, 19, 19, 19, 20, 20, 20, 21, 21, 21, 21, 22, 22, 22, 23, 23, 23, 24, 24, 24, 24, 25, 25, 25, 26, 26, 26, 26, 27, 27, 27, 28

Offset

2,1

Comments

A138194(n) <= A000720(n) <= a(n), (Tschebyscheff, 1850).

Links

Table of n, a(n) for n=2..76.

Mathematica

Table[Floor[(8n)/(5Log[n])], {n, 2, 80}] (* Harvey P. Dale, Feb 14 2025 *)

Crossrefs

Cf. A050500, A050499, A050501.

Sequence in context: A331842 A006264 A134994 * A140744 A179414 A361248

Adjacent sequences: A138192 A138193 A138194 * A138196 A138197 A138198

Keyword

nonn

Author

Reinhard Zumkeller, Mar 04 2008

Status

approved