Seleccione solo columnas numéricas de DataFrame en R

En este artículo, discutiremos cómo seleccionar solo columnas numéricas del marco de datos en el lenguaje de programación R.

Método 1: Usar el paquete Dplyr

Podemos usar la función select_if() para obtener columnas numéricas llamando a la función con el nombre del marco de datos y la función isnumeric() que verificará las columnas numéricas.

Sintaxis:

select_if(marco de datos, es.numérico)

dónde,

• dataframe es el dataframe de entrada
• is.numeric se demanda para obtener las columnas numéricas

Ejemplo: programa R para obtener columnas numéricas del marco de datos usando dplyr

# load the package dplyr
library("dplyr")
  
# create  a dataframe with 4 columns and 3 rows
data=data.frame("webtechnologies"=c("php","html","js"), 
                marks=c(98,89,90),
                age=c(12,23,21),
                name=c("bobby","ojaswi","ramya"))
  
      
# get numeric columns using dplyr() function             
print(select_if(data, is.numeric))

Producción:

Ejemplo: programa R para obtener columnas numéricas del marco de datos usando dplyr

# load the package dplyr
library("dplyr")
  
# create  a dataframe with 4 columns and 3 rows
data=data.frame(id=c(1,2,3), 
                marks=c(98,89,90),
                age=c(12,23,21),
                name=c("bobby","ojaswi","ramya"))
  
      
# get numeric columns using dplyr() function             
print(select_if(data, is.numeric))

Producción:

Método 2: Usar la función lapply()

Usaremos la función lapply() para obtener las columnas numéricas. Aquí, la función lapply() se llama con unlist() y el nombre del marco de datos y la función isnumeric() se le pasan como parámetros.

Sintaxis:

deslistar(lapply(marco de datos, es.numérico))

dónde,

• dataframe es el dataframe de entrada
• is.numeric se usa para verificar que cada columna del marco de datos sea numérica o no
• La función de deslistar se usa para deslistar el marco de datos.

Finalmente, pase este lapply() al índice del marco de datos

Sintaxis:

dataframe[,unlist(lapply(data, is.numeric))]

Donde, el marco de datos es el marco de datos de entrada

Ejemplo: programa R para obtener columnas numéricas del marco de datos usando la base R

# create  a dataframe with 4 columns and 3 rows
data=data.frame(id=c(1,2,3), 
                marks=c(98,89,90),
                age=c(12,23,21),
                name=c("bobby","ojaswi","ramya"))
  
      
# get numeric columns using dplyr() function             
print(data[,unlist(lapply(data, is.numeric))])

Producción: