Для таблицы mtcars:
1. Рассчитайте: среднее значение времени разгона (qsec) для автомобилей, число цилиндров (cyl) у которых не равняется 3 и показатель количества миль на галлон топлива (mpg) больше 20.
Получившийся результат (среднее значение) сохраните в переменную result.
2. При помощи функции aggregate рассчитайте стандартное отклонение переменной hp (лошадиные силы) и переменной disp (вместимости двигателя) у машин с автоматической и ручной коробкой передач.
Полученные результаты (результаты выполнения функции aggregate) сохраните в переменную descriptions_stat.
Задача 3
Воспользуемся встроенными данными - таблицей airquality. В новую переменную сохраните subset исходных данных, оставив наблюдения только для месяцев 7, 8 и 9.
При помощи функции aggregate рассчитайте количество непропущенных наблюдений по переменной Ozone в 7, 8 и 9 месяце. Для определения количества наблюдений используйте функцию length().
Результат выполнения функции aggregate сохраните в переменную result1.
Задача4
Примените функцию describeBy к количественным переменным данных airquality, группируя наблюдения по переменной Month. Чему равен коэффициент асимметрии (skew) переменной Wind в восьмом месяце?
Задача5
Обратимся к встроенным данным – таблица iris.
Найдите значения стандартного отклонения переменных. Разными способами
Задача 6
На основе данных iris расположите по убыванию значения медиан количественных переменных в группе virginica.
Задача 7
В переменной my_vector сохранен вектор с пропущенными значениями. Вам нужно создать новый вектор fixed_vector, в котором все пропущенные значения вектора my_vector будут заменены на среднее значение по имеющимся наблюдениям.
При этом исходный вектор оставьте без изменений!
Создайте переменную my_vector. Ниже небольшой код, который может создать случайный вектор (выборка из нормального распределения) с пропущенными значениями.
my_vector <- rnorm(30)
my_vector[sample(1:30, 10)] <- NA # на десять случайных позиций поместим NA
Изучите справку по функции replace. Вызвать справку можно исполнив команду:
?replace Попробуйте решить это задание при помощи этой функции.
Ayyub
Riga Tecnical University
Очень выручили. Работа выполнена оперативно и грамотно! Приношу благодарность!
Алина
НГАТУ
Работа выполнена отлично, подробные и понятные объяснения. Большое спасибо
Тамара
НГТУ
Очень оперативно выполнила задание. Замечания были незначительные, исполнитель их очень бы...
Ирина
Камчатский кооперативный техникум
Работа выполнена досрочно, исполнитель идет на встречу и легко идет на контакт! Благодарю ...