Добавил:
Koboku1
По своей натуре перфекционист. Поэтому люблю все аккуратно оформлять и упорядочивать, складывать по полочкам. Вот, не пропадать же добру, нажитому за четыре кропотливых семестра. Тут я выложил все мои ответы, курсовые, отчеты и некоторые ДЗ. Они могут вам помочь для получения зачета или сдачи экзамена. Если чего-то не нашли в папочках, то попытайте удачу в разделе НЕОТСОРТИРОВАННОЕ на моей страничке, там все 4 семестра разложены по папкам. ГРУППА КТ-43-15. Годы обучения 2015-2019. Коллекция будет пополняться. Что ж, удачки :З
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:
name <- c('Alexeeev Maksim', 'Mitrofanov Artemiy', 'Ivanov Alexandr', 'Fedor Nechitaylo', 'Ivan Stoletov', 'Petrov Denis', 'Mihail Baratov')
age <- c(17, 19, 18, 21, 20, 19, 18)
mark <- c(5, 3, 3, 5, 2, 4, 5)
sr = mean(mark)
data.frame(Name = name[mark > sr], Age = age[mark > sr], Mark = mark[mark > sr])
age <- c(17, 19, 18, 21, 20, 19, 18)
mark <- c(5, 3, 3, 5, 2, 4, 5)
sr = mean(mark)
data.frame(Name = name[mark > sr], Age = age[mark > sr], Mark = mark[mark > sr])