试编制做定量数据频数表分析的R语言函数。

要编制一个用于生成定量数据频数表的R语言函数，我们需要确定函数的基本逻辑和功能。这里我们可以创建一个函数，它接受一个数值向量作为输入，并输出该向量的频数表。频数表将包括每个唯一数值的出现次数、百分比以及累积百分比。

以下是一个简单的R函数示例，用于生成定量数据的频数表：

createFreqTable <- function(dataVector) {
  # 验证输入是否为数值型数据
  if(!is.numeric(dataVector)) {
    stop("输入必须是数值型向量")
  }
  
  # 计算频数
  frequency <- table(dataVector)
  
  # 计算百分比和累积百分比
  percentage <- round((frequency / sum(frequency)) * 100, 2)
  cumulativePercentage <- cumsum(percentage)
  
  # 创建数据框存储结果
  freqTable <- data.frame(
    Value = as.numeric(names(frequency)),
    Frequency = as.integer(frequency),
    Percentage = percentage,
    CumulativePercentage = cumulativePercentage
  )
  
  # 返回频数表
  return(freqTable)
}

使用此函数，您可以像这样处理您的数据：

# 假设有一个数值型向量
data <- c(1, 2, 2, 3, 3, 3, 4, 4, 4, 4)

# 调用函数生成频数表
frequencyTable <- createFreqTable(data)

# 打印结果
print(frequencyTable)

这将输出类似于以下结构的表格：

  Value Frequency Percentage CumulativePercentage
1     1         1       10.0                 10.0
2     2         2       20.0                 30.0
3     3         3       30.0                 60.0
4     4         4       40.0                100.0