id:A089190 - OEIS Search Results

Search: id:A089190

Displaying 1-1 of 1 results found.

page 1

a(n) = Floor[(Prime[n]+PrimePi[n])/2]

+0
1

1, 2, 3, 4, 7, 8, 10, 11, 13, 16, 18, 21, 23, 24, 26, 29, 33, 34, 37, 39, 40, 43, 46, 49, 53, 55, 56, 58, 59, 61, 69, 71, 74, 75, 80, 81, 84, 87, 89, 92, 96, 97, 102, 103, 105, 106, 113, 119, 121, 122, 124, 127, 128, 133, 136, 139, 142, 143, 147, 149, 150, 155, 162, 164 (list; graph; listen)

	OFFSET	`1,2`
	COMMENT	`Arithmetic mean of the primes and their distribution function.`
	MATHEMATICA	`digits=200 a=Table[Floor[(Prime[n]+PrimePi[n])/2], {n, 1, digits}]`
	CROSSREFS	`Sequence in context: A056033 A047547 A014456 this_sequence A065294 A026808 A003508` `Adjacent sequences: A089187 A089188 A089189 this_sequence A089191 A089192 A089193`
	KEYWORD	`nonn`
	AUTHOR	`Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jan 03 2004`

page 1

Search completed in 0.002 seconds

Last modified November 25 20:09 EST 2009. Contains 167514 sequences.

AT&T Labs Research