Подсчитайте количество пропущенных значений в R

Мы можем использовать colSums на логическом matrix

colSums(data == 0)

Или с sapply в цикле

sapply(data, function(x) sum(x == 0))

или с apply

apply(data, 2, function(x) sum(x == 0))

Или в цикле for

count <- numeric(ncol(data))
for(i in seq_along(data))  count[i] <- sum(data[[i]] == 0)

Попробуй это:

library(dplyr)

data %>% summarise(across(.fns = ~sum(.==0,na.rm=TRUE) ,.names = "Zeros_in_{.col}"))