Напишите функцию smartcor, которая получает на вход dataframe с двумя количественными переменными. Проверьте с помощью теста Шапиро-Уилка, что данные в обеих переменных принадлежат нормальному распределению. Если хотя бы в одном векторе распределение

Ниже представлен пошаговый разбор решения задачи и итоговый код функции smartcor на языке R.

────────────────────────────── Шаг 1. Анализ задачи. Нужно написать функцию, которая принимает на вход dataframe с двумя количественными переменными. Для каждой переменной необходимо проверить гипотезу о нормальности распределения с помощью теста Шапиро-Уилка (функция shapiro.test). Если хотя бы для одной переменной p-value теста меньше 0.05 (то есть распределение существенно отличается от нормального), то нужно вычислить корреляцию Спирмена; если же для обеих переменных p-value не меньше 0.05 (распр...