以下是一个基本的R函数来计算四分位数差(Q3-Q1)的代码示例:
# 定义函数计算四分位数差
calculate_iqr <- function(data) {
q1 <- quantile(data, 0.25) # 计算第一四分位数
q3 <- quantile(data, 0.75) # 计算第三四分位数
iqr <- q3 - q1 # 计算四分位数差
return(iqr)
}
# 测试函数
data <- c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
result <- calculate_iqr(data)
print(result)
代码中的calculate_iqr
函数接受一个数据向量作为输入,并使用quantile
函数来计算第一四分位数(Q1)和第三四分位数(Q3)。然后,将Q3和Q1的差作为四分位数差(IQR)返回。最后,使用一个示例数据向量进行测试,并打印结果。
上一篇:编写一个基本的半金字塔模式程序。