Функция mean() в R - вычисление среднего значения
Примеры на языке RФункция mean() в R используется для вычисления среднего значения выборок. Второй параметр функции можно задать для удаления некоторых выбросов.
Синтаксис функции mean() выглядит следующим образом:
mean(x, trim = 0, na.rm = FALSE, ...)
Описание параметра:
xВходной вектор
trimУдаление выбросов из начала и конца соответственно. Диапазон значений — от 0 до 0.5, указывающий долю выбросов, которые необходимо удалить перед вычислением среднего.
na.rmЛогическое значение, по умолчанию FALSE. Указывает, удалять ли пропущенное значение NA во входном векторе. Установка TRUE удаляет NA.
Пример
x <- c(12,27,3,4.2,2,2,54,-21,4,-2)
# Вычислить среднее значение
result.mean <- mean(x)
print(result.mean)
После выполнения приведённого выше кода результат вывода:
[1] 8.52
Далее мы используем параметр trim, чтобы удалить некоторые выбросы. В следующем примере мы устанавливаемtrim = 0.3, тогда он удалит из начала и конца вектора20*0.3=6элементы данных , левые(1, 2, 3)и правые (18, 19, 20)будут удалены.
Пример
# Создать вектор
x <- c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20)
# Вычислить среднее значение
result.mean <- mean(x,trim = 0.3)
result.mean2 <- mean(c(4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17))
print(result.mean)
print(result.mean2)
В приведенном выше примереmean(x,trim = 0.3)удаление 3 элементов из начала и конца эквивалентноmean(c(4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17))。
После выполнения приведённого выше кода результат вывода:
[1] 10.5 [1] 10.5
Во входном векторе функции mean, если элемент не имеет значения, по умолчанию используется NA. Мы можем использовать третий параметр, чтобы указать, удалять ли значение NA по умолчанию. Если NA не удален, возвращаемый результат — NA:
Пример
x <- c(1,2,3,4.5,6,NA)
# Вычислить среднее значение
result.mean <- mean(x)
print(result.mean)
# Удалить NA
result.mean <- mean(x,na.rm = TRUE)
print(result.mean)
После выполнения приведённого выше кода результат вывода:
[1] NA [1] 3.3Другие расширения