login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A090485 a(n) = Floor[(Exp[n/PrimePi[n]]-1)/Log[n]]. 0
9, 3, 4, 2, 3, 2, 3, 3, 4, 3, 4, 3, 3, 4, 4, 3, 4, 3, 3, 4, 4, 3, 4, 4, 5, 5, 6, 5, 5, 4, 5, 5, 5, 6, 7, 5, 6, 6, 7, 6, 6, 5, 5, 6, 6, 5, 6, 6, 6, 7, 7, 6, 7, 7, 7, 8, 8, 7, 8, 6, 7, 7, 8, 8, 9, 7, 8, 8, 9, 7, 8, 7, 7, 8, 8, 8, 9, 8, 8, 8, 9, 8, 8, 8, 9, 9, 10, 8, 9, 9, 9, 10, 10, 11, 11, 10, 10, 11, 11, 10 (list; graph; refs; listen; history; text; internal format)
OFFSET

2,1

COMMENTS

The Shannon signal power of the distribution of the Primes.

REFERENCES

C. E. Shannon, The Mathematical Theory of Communication, page 100.

LINKS

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

MATHEMATICA

digits=200 f[n_]=Floor[(Exp[n/PrimePi[n]]-1)/Log[n]] a=Table[f[n], {n, 2, digits}]

CROSSREFS

Sequence in context: A097902 A139425 A191689 * A021521 A011011 A236100

Adjacent sequences:  A090482 A090483 A090484 * A090486 A090487 A090488

KEYWORD

nonn

AUTHOR

Roger L. Bagula, Feb 01 2004

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 29 22:26 EDT 2021. Contains 346346 sequences. (Running on oeis4.)