вычисление среднего, медианы и моды в R