如何在R中统计因子型与数值型变量的缺失值数量

没问题，我来帮你快速实现这个需求！下面是具体的代码和步骤，你可以直接套用：

第一步：准备变量列表（如果还没提前筛选好的话） #

如果你还没把30个因子型、70个数值型变量的列名存成单独的向量，可以先从数据集中提取：

# 替换成你的实际数据集名称
your_data <- your_actual_dataset

# 提取因子型变量列名
factor_vars <- names(your_data)[sapply(your_data, is.factor)]
# 提取数值型变量列名
numeric_vars <- names(your_data)[sapply(your_data, is.numeric)]

第二步：统计并输出因子型变量的缺失值 #

用sapply遍历每个因子变量统计NA数量，再按照你要的格式输出：

# 统计因子变量的缺失值数量
factor_na_counts <- sapply(your_data[factor_vars], function(x) sum(is.na(x)))

# 按指定格式打印结果
cat("所有因子型变量：\n")
for(var_name in names(factor_na_counts)){
  cat(paste0(var_name, "有", factor_na_counts[var_name], "个NA；\n"))
}

第三步：统计并输出数值型变量的缺失值 #

同样的逻辑处理数值型变量：

# 统计数值变量的缺失值数量
numeric_na_counts <- sapply(your_data[numeric_vars], function(x) sum(is.na(x)))

# 按指定格式打印结果
cat("\n所有数值型变量：\n")
for(var_name in names(numeric_na_counts)){
  cat(paste0(var_name, "有", numeric_na_counts[var_name], "个NA；\n"))
}

小提示 #

• 记得把代码里的your_data替换成你实际使用的数据集名称哦！
• 如果已经提前有了factor_vars和numeric_vars向量，直接跳过第一步就行。

内容的提问来源于stack exchange，提问作者NMB