##Introducci?n a R 
##Modulo 3
##Video 2

###Array

matriz <- matrix(1:9, 3)
matriz2 <- matrix(10:18, 3)

array1 <- array(c(matriz, matriz2), dim = c(3,3,2))
array1

array1[1,1,2]

### Listas

#Las listas son objetos que pueden almacenar, a su vez, variados objetos de distinto tipo . 
#Por ejemplo, una lista puede tener matrices y vectores tanto n?mericos como con caracteres as? como data frames. 
#Podemos usar la funci?n `list()` para crear listas.

#Utilizar? el array ya creado, y crear? un vector con n?meros, una matriz con n?meros, 
#y un vector con letras:
vector <- 1:5
matriz <- matrix(1:9, ncol = 3)
vector_l <- c("a", "b", "c")

#Con estos cuatros objetos crearemos una lista que los contenga todos
(milista <- list(array1, vector, matriz, vector_l))

#Como pueden ver ahora los cuatro objetos previamente creados se pueden ver dentro de `milista`. 
#Para acceder a estos objetos dentro de la lista se debe utilizar `[[indice]]`. 
#Por ejemplo, para acceder a la matriz dentro de la lista lo hcemos de la siguiente forma:
  
milista[3]
class(milista[3])

milista[[3]]
class(milista[[3]])

milista[3][,2]

#Ahora bien, podemos tambi?n hacer otra cosa para que el acceso a los objetos de la lista 
#sea m?s simple(o intuitivo).
(milista = list(array = array1, v = vector, m = matriz, v2 = vector_l))

#Como ver?n ya no contamos con `[[1]]`, `[[2]]`, `[[3]]`, y [[4]] (aunque todav?a se pueden usar) 
#si no que con `$v`, `$m` y `$v2` que fueron los nombres que el asignamos 
#a cada uno de los objetos dentro de la lista. Esto permite una funcionalidad muy ?til.

milista$v2 # = a milista[[4]]
milista$v2[2]