缺失值,表整理—tidyr包

tidyr包主要涉及：
1)缺失值的简单补齐
2)长形表变宽形表与宽形表变长形表
3)列分割与列合并

1.缺失值的简单补齐
library(tidyr)
library(dplyr)

# 创建含有缺失值的数据框示例
x <- c(1,2,7,8,NA,10,22,NA,15)
y <- c("a",NA,"b",NA,"b","a","a","b","a")
df <- data.frame(x = x,y = y)
df

下面用x的均值或中位数替换缺失值，用y的众数替换缺失值。

#计算x的均值和中位数(对缺失值比较敏感)
x_mean <- mean(df$x, na.rm = TRUE)
x_median <- median(df$x, na.rm = TRUE)
#计算y的众数
y_mode <- as.character(df$y[which.max(table(df$y))])

a <- which.max(table(df$y)) #整数型变量,即列表元素个数最多的位置
a1 <- df$y[which.max(table(df