Lehmer mean

From testwiki
Jump to navigation Jump to search

Template:Short description In mathematics, the Lehmer mean of a tuple x of positive real numbers, named after Derrick Henry Lehmer,[1] is defined as:

Lp(𝐱)=βˆ‘k=1nxkpβˆ‘k=1nxkpβˆ’1.

The weighted Lehmer mean with respect to a tuple w of positive weights is defined as:

Lp,w(𝐱)=βˆ‘k=1nwkβ‹…xkpβˆ‘k=1nwkβ‹…xkpβˆ’1.

The Lehmer mean is an alternative to power means for interpolating between minimum and maximum via arithmetic mean and harmonic mean.

Properties

The derivative of p↦Lp(𝐱) is non-negative

βˆ‚βˆ‚pLp(𝐱)=(βˆ‘j=1nβˆ‘k=j+1n[xjβˆ’xk]β‹…[ln(xj)βˆ’ln(xk)]β‹…[xjβ‹…xk]pβˆ’1)(βˆ‘k=1nxkpβˆ’1)2,

thus this function is monotonic and the inequality

p≀q⟹Lp(𝐱)≀Lq(𝐱)

holds.

The derivative of the weighted Lehmer mean is:

βˆ‚Lp,w(𝐱)βˆ‚p=(βˆ‘wxpβˆ’1)(βˆ‘wxplnx)βˆ’(βˆ‘wxp)(βˆ‘wxpβˆ’1lnx)(βˆ‘wxpβˆ’1)2

Special cases

Applications

Signal processing

Like a power mean, a Lehmer mean serves a non-linear moving average which is shifted towards small signal values for small p and emphasizes big signal values for big p. Given an efficient implementation of a moving arithmetic mean called Template:Code you can implement a moving Lehmer mean according to the following Haskell code.

lehmerSmooth :: Floating a => ([a] -> [a]) -> a -> [a] -> [a]
lehmerSmooth smooth p xs =
    zipWith (/)
            (smooth (map (**p) xs))
            (smooth (map (**(p-1)) xs))

Gonzalez and Woods call this a "contraharmonic mean filter" described for varying values of p (however, as above, the contraharmonic mean can refer to the specific case p=2). Their convention is to substitute p with the order of the filter Q:

f(x)=βˆ‘k=1nxkQ+1βˆ‘k=1nxkQ.

Q=0 is the arithmetic mean. Positive Q can reduce pepper noise and negative Q can reduce salt noise.[2]

See also

Notes

Template:Reflist

Template:Statistics

  1. ↑ P. S. Bullen. Handbook of means and their inequalities. Springer, 1987.
  2. ↑ Template:Cite book