調和平均
調和平均は、データの逆数の算術平均の逆数です。つまり、
$$ \text{harmonic_mean}(x) = 1 / \text{arithmetic_mean}(1 / x) $$
調和平均は比率データの平均に用いられることが多いです。ここでは、Standard and Poor's 500 指数に含まれる株式の株価収益率（price/earnings ratio）を対象に利用します。データは std_and_poor500 として提供されています。株価収益率は、その株がどれだけ割高かを示す指標です。
dplyr パッケージは読み込まれています。
この演習はコースの一部です
R関数入門
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# Look at the Standard and Poor 500 data
glimpse(std_and_poor500)
# Write a function to calculate the reciprocal
___ <- ___ {
___
}