DF <- data.frame(Dato1 = c(1,0,0,3,5.5,0, NA, NA, 0,9))
#NA = no disponible
DF
#> Dato1
#> 1 1.0
#> 2 0.0
#> 3 0.0
#> 4 3.0
#> 5 5.5
#> 6 0.0
#> 7 NA
#> 8 NA
#> 9 0.0
#> 10 9.0
#cuantas filas tienen dato > a 0
sum(DF$Dato1 > 0, na.rm = TRUE)
#> [1] 4
#cuantas filas están en blanco
sum(is.na(DF$Dato1))
#> [1] 2
Created on 2020-04-30 by the reprex package (v0.3.0)