#Creando una lista
lista1 <- list("Juan Perez", 234)
lista1[[1]]
[1] "Juan Perez"
[[2]]
[1] 234#Clase de la lista
class(lista1)[1] "list"4 Listas
Una lista es una colección ordenada de elementos. Las listas son mutables, lo que significa que podemos actualizar el elemento de la lista a nivel de índice.
Sin embargo, una lista también es un tipo de secuencia, por lo que admite la indexación. Para crear la lista, necesitamos poner elementos dentro de “list( )” separándolos con una coma.
4.1 Acceder a los elementos de la lista
La lista admite la indexación (comenzando desde 1), por lo que, para acceder a los elementos de una lista de R, usaremos el índice de ese elemento.
# Accede al primer elemento
lista1[[1]][1] "Juan Perez"# Accede al segundo elemento
lista1[[2]][1] 234Podemos incluir en una listas, secuencias y vectores.
#Creando una lista que incluye secuencias y vectores
lista2 <- list(2:5, c("a", "b"), c(TRUE, FALSE, TRUE), 10.5, "Elemento")
lista2[[1]]
[1] 2 3 4 5
[[2]]
[1] "a" "b"
[[3]]
[1] TRUE FALSE TRUE
[[4]]
[1] 10.5
[[5]]
[1] "Elemento"# Accede al primer elemento
lista2[[1]][1] 2 3 4 5# Muestra la estructura de la lista
str(lista2)List of 5
$ : int [1:4] 2 3 4 5
$ : chr [1:2] "a" "b"
$ : logi [1:3] TRUE FALSE TRUE
$ : num 10.5
$ : chr "Elemento"4.2 Agregar elementos a una lista
lista3 <- list(3, "Pepe", 5:9)
elemento_nuevo <- "Sara"
#Podemos actualizar la lista3 o crear una nueva lista donde este agregado el elemento_nuevo
lista3 <- list(lista3, elemento_nuevo)
lista3[[1]]
[[1]][[1]]
[1] 3
[[1]][[2]]
[1] "Pepe"
[[1]][[3]]
[1] 5 6 7 8 9
[[2]]
[1] "Sara"4.3 Concatenacion y repetición
De esta manera se pueden combinar elementos de una lista a otra. Las listas se colocan en el orden que se desea que aparezcan.
lista1 <- list(2, 4, 6, 8, 10)
lista2 <- list(1, 3, 5, 7)
numeros <- list(lista2, lista1)
print(numeros)[[1]]
[[1]][[1]]
[1] 1
[[1]][[2]]
[1] 3
[[1]][[3]]
[1] 5
[[1]][[4]]
[1] 7
[[2]]
[[2]][[1]]
[1] 2
[[2]][[2]]
[1] 4
[[2]][[3]]
[1] 6
[[2]][[4]]
[1] 8
[[2]][[5]]
[1] 10Actualizar la lista de Python
Usando la indexación, podemos actualizar el valor indexado especificado en una lista.
numeros <- list(1,2,3,4,5,6)
numeros[2] <- 22
print(numeros)[[1]]
[1] 1
[[2]]
[1] 22
[[3]]
[1] 3
[[4]]
[1] 4
[[5]]
[1] 5
[[6]]
[1] 64.4 Eliminar un elemento de la lista
Para eliminar un elemento se usa el siguiente codigo:
numeros <- list(1,2,3,4,5,6)
numeros <- numeros[numeros != 6]
print(numeros)[[1]]
[1] 1
[[2]]
[1] 2
[[3]]
[1] 3
[[4]]
[1] 4
[[5]]
[1] 5Analogamente, tambien se puede usar:
numeros <- list(1,2,3,4,5,6)
numeros <- numeros[-2]
print(numeros)[[1]]
[1] 1
[[2]]
[1] 3
[[3]]
[1] 4
[[4]]
[1] 5
[[5]]
[1] 64.5 Comprobar la pertenencia de un elemento
Podemos usar la funcion %in% para comprobar si un elemento se encuentra en la lista.
frutas <- list("fresa", "papaya", "piña")
"fresa" %in% frutas[1] TRUEcat("Comprobando si el mango está en la lista :", "plátano" %in% frutas)Comprobando si el mango está en la lista : FALSE4.6 Ordenar los elementos de la lista
Para ordenar los elementos de una lista primero debemos transformarla a un vector, luego ordenamos el vector con la funcion “sort” y por ultimo volvemos a convertirla a una lista.
mi_lista <- list(20, 25, 22, 64, 15, 28)
mi_vector <- unlist(mi_lista)
mi_vector_ordenado <- sort(mi_vector)
mi_lista_ordenada <- list(mi_vector_ordenado)
print(mi_lista_ordenada)[[1]]
[1] 15 20 22 25 28 64Si queremos ordenarla de manera decreciente deberemos seguir los mismos pasos pero agregando “decreasing = True” en la funcion sort.
mi_lista <- list(20, 25, 22, 64, 15, 28)
mi_vector <- unlist(mi_lista)
mi_vector_ordenado <- sort(mi_vector, decreasing = TRUE)
mi_lista_ordenada <- list(mi_vector_ordenado)
print(mi_lista_ordenada)[[1]]
[1] 64 28 25 22 20 154.7 Longitud de una lista y recuento de un elemento en la lista
Para obtener la longitud de cualquier lista (tamaño de la lista), podemos usar la función len(). Y para obtener el recuento de cuántas apariciones del elemento o elemento especificado, podemos usar la función count().
# Ejemplo 1
mi_lista <- list(20, 25, 22, 64, 15, 28,25,30,25)
cat("Mi Lista:\n")Mi Lista:print(mi_lista)[[1]]
[1] 20
[[2]]
[1] 25
[[3]]
[1] 22
[[4]]
[1] 64
[[5]]
[1] 15
[[6]]
[1] 28
[[7]]
[1] 25
[[8]]
[1] 30
[[9]]
[1] 25# Hallar la longitud
longitud_lista <- length(mi_lista)
print(longitud_lista)[1] 9# Hallar cuantas veces contengo un elemento
cant_lista <- sum(mi_lista ==25)
print(cant_lista)[1] 3# Ejemplo 2
mi_lista <- c(1,2,3,4,5) 4.8 Agregar elemento(s) en listas
Analogia de una tupla de Python en R.Como las tuplas son inmutables, no podemos agregar ni modificar la tupla existente. Pero de otra forma, podemos usar el operador de concatenación “+” y concatenar la nueva tupla con un solo elemento de la existente y crear una nueva referencia de tupla.
# Ejemplo 1
# Tupla Inicial
tupla_inicial <- c(1, 2, 3)
print(paste("tupla t1 =", tupla_inicial))[1] "tupla t1 = 1" "tupla t1 = 2" "tupla t1 = 3"# Crear una nueva tupla agregando (4,), tupla con un solo elemento en la tupla inicial
tupla_inicial_1 <- c(tupla_inicial, 4)
print(paste("tuple tupla_inicial_1.1 =", tupla_inicial_1))[1] "tuple tupla_inicial_1.1 = 1" "tuple tupla_inicial_1.1 = 2"
[3] "tuple tupla_inicial_1.1 = 3" "tuple tupla_inicial_1.1 = 4"tupla_inicial_1[1] 1 2 3 4# Para crear una tupla con un solo elemento, es necesario incluir una coma al final:
t1 <- c('a')
t1[1] "a"#Averiguar el tipo de data
class(t1)[1] "character"# Otra forma de construir una tupla es utilizando la función interna tuple. Sin argumentos, ésta crea una tupla vacía:
t3 <- c()
t3NULL# Si el argumento es una secuencia (cadena, lista, o tupla), el resultado de la llamada a tuple es una tupla con los elementos de la secuencia:
# Crear una lista con cada letra de la palabra "Programación"
palabra <- 'Programación'
lista_de_letras <- strsplit(palabra, split = '')[[1]]
# Imprimir la lista de letras
print(lista_de_letras) [1] "P" "r" "o" "g" "r" "a" "m" "a" "c" "i" "ó" "n"4.9 Asignación
mi_tabla <- matrix(1:9, nrow = 3, ncol = 3)
cat("Mi Tabla:\n")Mi Tabla:print(mi_tabla) [,1] [,2] [,3]
[1,] 1 4 7
[2,] 2 5 8
[3,] 3 6 94.10 Asignación de un data frame
mi_df <- data.frame(
Nombre = c("Ana", "Carlos", "Elena"),
Edad = c(25, 32, 28),
Ciudad = c("Madrid", "Barcelona", "Valencia")
)
cat("Mi Data Frame:\n")Mi Data Frame:print(mi_df) Nombre Edad Ciudad
1 Ana 25 Madrid
2 Carlos 32 Barcelona
3 Elena 28 Valencia