Как использовать среднюю функцию в R (с примерами)


Вы можете использовать функцию mean() в R для вычисления среднего значения в векторе:

mean(x)

В следующих примерах показано, как использовать эту функцию на практике.

Пример 1: вычислить среднее значение вектора

Следующий код показывает, как вычислить среднее значение вектора в R:

#define vector
x <- c(3, 6, 7, 7, 12, 14, 19, 22, 24)

#calculate mean of vector
mean(x)

[1] 12.66667

Если в вашем векторе есть пропущенные значения, обязательно укажите na.rm = TRUE , чтобы игнорировать пропущенные значения при вычислении среднего значения:

#define vector with some missing values
x <- c(3, 6, 7, 7, NA, 14, NA, 22, 24)

#calculate mean of vector
mean(x, na. rm = TRUE )

[1] 11.85714

Вы также можете использовать аргумент обрезки , чтобы обрезать определенную долю (от 0 до 0,5) наблюдений с каждого конца вектора перед вычислением среднего значения:

#define vector
x <- c(3, 6, 7, 7, 12, 14, 19, 22, 24)

#calculate mean of vector after trimming 20% of observations off each end
mean(x, trim = 0.2 )

[1] 12.42857

Пример 2: вычислить среднее значение столбца во фрейме данных

Следующий код показывает, как вычислить среднее значение определенного столбца во фрейме данных:

#define data frame
df <- data.frame(a=c(3, 6, 7, 7, 12, 14, 19, 22, 24),
 b=c(4, 4, 5, 12, 13, 14, 9, 1, 2),
 c=c(5, 6, 6, 3, 5, 5, 6, 19, 25))

#calculate mean of column 'a'
mean(df$a)

[1] 12.66667

Пример 3: вычислить среднее значение нескольких столбцов во фрейме данных

В следующем коде показано, как использовать функцию apply() для вычисления среднего значения нескольких столбцов во фрейме данных:

#define data frame
df <- data.frame(a=c(3, 6, 7, 7, 12, 14, 19, 22, 24),
 b=c(4, 4, 5, 12, 13, 14, 9, 1, 2),
 c=c(5, 6, 6, 3, 5, 5, 6, 19, 25))

#calculate mean of columns 'a' and 'c'
apply(df[ , c('a', 'c')], 2, mean)

 a c 
12.666667 8.888889

Дополнительные ресурсы

Как рассчитать среднее значение по группе в R
Как рассчитать средневзвешенное значение в R
Как рассчитать среднее геометрическое в R

Замечательно! Вы успешно подписались.
Добро пожаловать обратно! Вы успешно вошли
Вы успешно подписались на кодкамп.
Срок действия вашей ссылки истек.
Ура! Проверьте свою электронную почту на наличие волшебной ссылки для входа.
Успех! Ваша платежная информация обновлена.
Ваша платежная информация не была обновлена.