login
This site is supported by donations to The OEIS Foundation.
Logo

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A089175 a(n) = Floor[Sqrt[Prime[n]*PrimePi[n]]] 0
0, 1, 3, 3, 5, 6, 8, 8, 9, 10, 12, 13, 15, 16, 16, 17, 20, 20, 23, 23, 24, 25, 27, 28, 29, 30, 30, 31, 33, 33, 37, 37, 38, 39, 40, 40, 43, 44, 44, 45, 48, 48, 51, 51, 52, 52, 56, 57, 58, 58, 59, 59, 62, 63, 64, 64, 65, 65, 68, 69, 71, 72, 74, 74, 75, 75, 79, 80, 81, 81, 84, 84 (list; graph; refs; listen; history; internal format)
OFFSET

1,3

COMMENTS

Geometric mean of primes and their distribution function.

MATHEMATICA

digits=200 a=Table[Floor[Sqrt[Prime[n]*PrimePi[n]]], {n, 1, digits}]

CROSSREFS

Sequence in context: A131209 A116592 A152772 * A138373 A011976 A060022

Adjacent sequences:  A089172 A089173 A089174 * A089176 A089177 A089178

KEYWORD

nonn

AUTHOR

Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jan 03 2004

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified February 15 03:33 EST 2012. Contains 205694 sequences.