OFFSET
1,1
COMMENTS
Log-type weighted average function of primes and the prime distribution.
This function makes use of the addition property of logs. The resulting function looks like a log square wave with ringing on the leading edge.
MATHEMATICA
digits=200 g[n_]=Floor[(Prime[n]-n)/(n-PrimePi[n])] b=Table[(g[n]+g[n+1])-g[n*(n+1)]+1, {n, 1, digits}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Jan 04 2004
STATUS
approved