R语言数据框：识别数字列并填充NA值

可以使用下面的代码来判断数据框中每列的类型，找到数字类型的列中的NA值，并进行填充：

# 创建一个示例数据框
df <- data.frame(a = c(1, 2, NA, 4), b = c('A', 'B', 'C', 'D'), c = c('2021-01-01', '2021-01-02', '2021-01-03', '2021-01-04'))

# 判断每列的类型
for (i in 1:ncol(df)) {
  if (is.numeric(df[,i])) {
    # 找到数字类型的列中的NA值，并进行填充为0
    df[is.na(df[,i]),i] <- 0
  }
}

# 打印结果
print(df)

输出结果：

  a b          c
1 1 A 2021-01-01
2 2 B 2021-01-02
3 0 C 2021-01-03
4 4 D 2021-01-04

在上面的代码中，使用了is.numeric函数来判断每列是否为数字类型的列。如果是数字类型的列，则使用is.na函数找到其中的NA值，并将其填充为0。最后打印出结果。