R怎么对超过5000的变量作正态性检验

当变量数量很大时，可以使用循环语句来进行批量的正态性检验。下面是一个示例代码，假设有一个数据框df，其中包含超过5000个变量：

# 生成一个数据框，包含5000个变量
set.seed(123)
df <- data.frame(replicate(5000, rnorm(100)))

# 批量进行Shapiro-Wilk检验
p_values <- rep(NA, ncol(df))
for (i in 1:ncol(df)) {
  p_values[i] <- shapiro.test(df[,i])$p.value
}

# 统计不服从正态分布的变量数量
sum(p_values < 0.05)

首先，使用replicate函数生成一个包含5000个变量的数据框df。然后，使用循环语句对每个变量进行Shapiro-Wilk检验，并将p-value存储在p_values向量中。最后，统计不服从正态分布的变量数量，可以使用sum函数和逻辑向量进行计算。