Cuente los valores distintos de cero en cada columna del marco de datos R

En este artículo, vamos a contar la cantidad de entradas de datos distintas de cero en los datos usando el lenguaje de programación R.

Para verificar la cantidad de entradas de datos distintas de cero en los datos, primero debemos colocar esos datos en el marco de datos usando:

data <- data.frame(x1 = c(1,2,0,100,0,3,10), 
                  x2 = c(5,0,1,8,10,0,0),
                  x3 = 0)

print(data)

Producción:

Ahora tenemos los datos en el marco de datos. Entonces, para contar el número de entradas distintas de cero en cada columna, usamos la función colSums(). Esta función se utiliza como:

colSums( data != 0)

Producción:

Como puede ver claramente, hay 3 columnas en el marco de datos y Col1 tiene 5 entradas distintas de cero (1,2,100,3,10) y Col2 tiene 4 entradas distintas de cero (5,1,8,10) y Col3 tiene 0 entradas distintas de ceros.

Ejemplo 1: aquí vamos a crear un marco de datos y luego contaremos los valores distintos de cero en cada columna.

# Create example data frame
data <- data.frame(x1 = c(1,2,0,100,0,3,10),   
                   x2 = c(5,0,1,8,10,0,0),
                   x3 = 0)
  
#  print the dataframe
print(data) 
  
# check for every non zero entry using "data!=0" 
# and sum the number of entries using colSums()
colSums(data != 0)

Producción: 

Ejemplo 2: En este ejemplo, estamos usando el conjunto de datos iris3 . 

# put the iris3 data in dataframe
data <- data.frame(iris3)
  
# check the dimensions of dataframe
dim(data)
  
# check for every non zero entry using "data!=0" 
# and sum the number of entries using colSums()
colSums(data != 0)

Producción:

Ejemplo 3: En este ejemplo, se usa el conjunto de datos state.x77.

# put the state.x77 data in dataframe
data <- data.frame(state.x77)
  
# check the dimensions of dataframe
dim(data)  
  
# check for every non zero entry using "data!=0" 
# and sum the number of entries using colSums()
colSums(data != 0)

Producción:

Ejemplo 4: En este ejemplo, se usa el conjunto de datos USArrest .

# put the USArrest data in dataframe
data <- data.frame(USArrest)
  
# check the dimensions of dataframe
dim(data)  
  
# check for every non zero entry using "data!=0" 
# and sum the number of entries using colSums()
colSums(data != 0)

Producción: