R语言编写自定义函数以及sapply函数计算数据框字段的描述性统计信息

R语言编写自定义函数以及sapply函数计算数据框字段的描述性统计信息

在R语言中，我们经常需要对数据进行描述性统计分析，以了解数据的基本特征。为了提高代码的重用性和可维护性，我们可以编写自定义函数来计算数据框中各个字段的描述性统计信息。同时，R语言中的sapply函数可以方便地应用于数据框的每个字段，进一步简化统计分析的过程。

首先，让我们看一下如何编写一个自定义函数来计算数据框字段的描述性统计信息。我们将创建一个函数，该函数接受一个数据框和一个字段名称作为输入，并返回该字段的均值、标准差、最小值、最大值和中位数。

# 自定义函数：计算字段的描述性统计信息
calculate_stats <- function(data, column_name) {
  column <- data[[column_name]]
  
  mean_value <- mean(column)
  sd_value <- sd(column)
  min_value <- min(column)
  max_value <- max(column)
  median_value <- median(column)
  
  stats <- c("Mean" = mean_value, "Standard Deviation" = sd_value, "Minimum" = min_value,
             "M