R语言自己编写一个函数，求数据y=(y1,y2,…,yn)的均值，标准差，极差和变异系数。

在R语言中，你可以通过内置的统计函数来计算一组数值(y1, y2, ..., yn)的均值、标准差、极差以及变异系数。以下是创建一个自定义函数来完成这些计算：

# 创建一个名为custom_stats的函数
custom_stats <- function(data_y) {
  # 计算均值
  mean_value <- mean(data_y)
  
  # 计算标准差
  sd_value <- sd(data_y)
  
  # 计算极差（最大值减去最小值）
  range_value <- max(data_y) - min(data_y)
  
  # 计算变异系数（标准差除以均值）
  cv_value <- sd_value / mean_value
  
  # 返回一个列表包含所有结果
  list(mean = mean_value, sd = sd_value, range = range_value, cv = cv_value)
}

# 使用示例
y_values <- c(10, 20, 30, 40, 50)  # 假设这是你的数据
result <- custom_stats(y_values)
print(result)
#