Вычисления с R: функция "масштабирования"