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
R
# 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
R
# 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
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:
Publicación traducida automáticamente
Artículo escrito por manojkumarreddymallidi y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA