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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A075465 Rounded average of first n primes. 3
2, 2, 3, 4, 6, 7, 8, 10, 11, 13, 15, 16, 18, 20, 22, 24, 26, 28, 30, 32, 34, 36, 38, 40, 42, 45, 47, 49, 51, 53, 55, 58, 60, 63, 65, 67, 70, 72, 75, 77, 80, 82, 85, 87, 90, 92, 94, 97, 100, 102, 105, 107, 110, 113, 115, 118, 121, 123, 126, 128, 131, 133, 136 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

38 is an average of first n=23 primes; 110 (n=53); 3066 (n=853); 60020(n=11869). For other n, an average of first n primes is non-integer, in general the function "mean prime(n)" may be non-monotonic, in places of large gaps between primes.

In case of a tie, round down. Thus a(2) = 2, not 3. The next cases where this arises are a(1810) = 7265 and a(2458) = 10285. - Robert Israel, Oct 02 2015

LINKS

Robert Israel, Table of n, a(n) for n = 1..10000

FORMULA

a(n) = round(A007504(n) / n). - Ran Pan, Oct 02 2015

a(n) ~ n * log(n) / 2. - Ran Pan, Oct 02 2015

EXAMPLE

38 is an average of first n=23 primes; 110 (n=53);

MAPLE

rd:= t -> ceil(t+1/2)-1:

Primes:= select(isprime, [2, seq(2*i+1, i=1..1000)]):

S:= ListTools:-PartialSums(Primes):

zip((a, b) -> rd(a/b), S, [$1..nops(S)]); # Robert Israel, Oct 02 2015

MATHEMATICA

rnd[n_]:=Block[{ip=IntegerPart[n]}, If[n>ip+1/2, ip+1, ip]]; r=Range@1000; rnd@#&/@(Accumulate[Prime[r]]/r) (* Robert G. Wilson v Oct 02 2015 *)

CROSSREFS

Cf. A007504, A060620.

Sequence in context: A008806 A238860 A144367 * A011868 A145813 A240865

Adjacent sequences:  A075462 A075463 A075464 * A075466 A075467 A075468

KEYWORD

easy,nonn

AUTHOR

Zak Seidov, Oct 11 2002

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified September 26 06:54 EDT 2017. Contains 292502 sequences.