R mean() 函数 - 计算平均值

R mean() 函数用来计算样本的平均值，该函数的第二个参数可以设置去掉部分异常分数据。

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