This is documentation for Mathematica 7, which was
based on an earlier version of the Wolfram Language.
View current documentation (Version 11.2)


gives the contraharmonic mean of the values in list.
ContraharmonicMean[list, p]
gives the order p Lehmer contraharmonic mean.
  • For the list {x1, x2, ..., xn}, the contraharmonic mean is given by (sum_ix_i^2)/(sum_ix_i).
  • The order p Lehmer mean is given by (sum_ix_i^p)/(sum_ix_i^(p-1)).
  • ContraharmonicMean[{{x1, y1, ...}, {x2, y2, ...}, ...}] gives {ContraharmonicMean[{x1, x2, ...}], ContraharmonicMean[{y1, y2, ...}]}.
Symbolic values:
Means of each column:
New in 7