En este artículo, vamos a ver cómo extraer solo el número del vector numérico nombrado en el lenguaje de programación R.
Método 1: Usar NULL
El método names() puede invocarse en el vector y asignarse a NULL para eliminar cualquier instancia de los nombres establecidos en este objeto. Realiza modificaciones al objeto vectorial original.
R
# declaring a vector
vec <- c(0 : 5)
# assigning names to the vector
names(vec)<-c("Ele1", "Ele2", "Ele3",
"Ele4", "Ele5", "Ele6")
print("Original vector")
print(vec)
# assigning the names vector to null
names(vec) <- NULL
print("Modified vector")
print(vec)
Producción:
[1] "Original vector" Ele1 Ele2 Ele3 Ele4 Ele5 Ele6 0 1 2 3 4 5 [1] "Modified vector" [1] 0 1 2 3 4 5
Explicación: Los nombres de las strings se han asignado como nombres a los elementos correspondientes del vector. Tan pronto como se asigna null al método names(), los nombres se restablecen y solo se devuelven los valores numéricos.
Método 2: Usar el método unname()
El método unname() en R se usa para eliminar cualquier instancia de los nombres asignados al objeto R sobre el que se invoca. Restablece los nombres asignados al objeto vectorial y extrae la parte numérica de él. Los cambios deben almacenarse para que se reflejen durante el uso posterior.
R
# declaring a vector
vec <- c(0 : 5)
# assigning names to the vector
names(vec)<-c("Ele1", "Ele2",
"Ele3", "Ele4", "Ele5")
print("Original vector")
print(vec)
# assigning the names vector to null
vec_mod <- unname(vec)
print("Modified vector")
print(vec_mod)
Producción:
[1] "Original vector" Ele1 Ele2 Ele3 Ele4 Ele5 <NA> 0 1 2 3 4 5 [1] "Modified vector" [1] 0 1 2 3 4 5
Método 3: Usar el método as.numeric()
El método as.numeric() en R se usa para forzar un argumento a un valor numérico. Sin embargo, es una función genérica aplicable a números enteros, flotantes o de tipo doble. Elimina cualquier string almacenada dentro de los números, ya sean nombres o elementos que no se puedan convertir en datos numéricos. Los cambios deben almacenarse para que se reflejen durante el uso posterior.
as.numeric(x)
R
# declaring a vector
vec <- c(1.2, 35.6, 35.2, 0.9, 46.7)
# assigning names to the vector
names(vec)<-c("Ele1", "Ele2",
"Ele3", "Ele4", "Ele5")
print("Original vector")
print(vec)
# reassigning names
vec_mod <- as.numeric(vec)
print("Modified vector")
print(vec_mod)
Producción:
[1] "Original vector" Ele1 Ele2 Ele3 Ele4 Ele5 1.2 35.6 35.2 0.9 46.7 [1] "Modified vector" [1] 1.2 35.6 35.2 0.9 46.7