.Rhistory

19120+17085
blogdown::build_site()
blogdown::serve_site()
blogdown::serve_site()
ls()
ls()
ls()
2+2
2+2
10/2
2+2
2+2
# Creamos un objeto llamado "year" con este año en forma numérica
year <- 2022
# Lo podemos imprimir simplemente escribiendo su nombre.
year
# Lo podemos imprimir simplemente escribiendo su nombre.
year
# Otra forma:
(year <- 2022)
# Lo podemos imprimir simplemente escribiendo su nombre.
year
year
# Otra forma:
(year <- 2022)
# También se puede imprimir de esta forma:
print(year)
# Ahora, que podemos hacer con este objeto? Lo podemos usar en operaciones
year - 1996
# Otra forma:
(year <- 2022)
# Creamos algunos objetos distintos
nombre <- "Dos mil veintidos"
# Uso la función typeof() para averiguar el tipo
typeof(year)
typeof(nombre)
# Uso la función class() para averiguar la clase
class(year) # es un vector de tipo numérico
class(nombre) # es un vector de tipo character
year_2 <- "2022"
class(year_2)
## Por qué importa el tipo de objeto?
# Character
obj_1 <- "10"
class(obj_1)
obj_1 + 20 # Da error
# Numeric
obj_2 <- 10
class(obj_2)
obj_2 + 20 # Funciona
# Numeric to character
obj_1_2 <- as.numeric(obj_1)
# Numeric to character
obj_1 <- as.numeric(obj_1)
##  3. Vectores   ===========================================================
a=1,2,3,4
## * 3.1.  Crear un vector con c() ----
mi_primer_vector <- c(1, 2, 3, 4, 5)
print(mi_primer_vector)
class(mi_primer_vector)
length(mi_primer_vector)
str(mi_primer_vector)
# Más vectores:
(v1 <- c(1:5)) # Todos los números de 1 a 5
(v2 <- seq(0, 50, 10)) # De 0 a 50 de a 10 números
(v3 <- c(v1, v2)) # Combino vectores creando un nuevo vector
(v4 <- c("rojo", "verde", "blanco")) # character
(v5 <- c(TRUE, TRUE, FALSE, TRUE)) # lógico
## * 3.2. Coerción automática: ----
(v6 <- c(v2, v4)) # Unir vector numérico con uno de caracteres
class(v6)
# Nos sirve por ejemplo para extraer partes del vector:
(v3 <- v2[1:3]) # Creo nuevo vector con los elementos del 1 al 3
# Más vectores:
(v1 <- c(1:5)) # Todos los números de 1 a 5
(v2 <- seq(0, 50, 10)) # De 0 a 50 de a 10 números
class(c(v1,v2))
(v4 <- c("rojo", "verde", "blanco")) # character
class(c(v1,v2,v4))
## 1. Crea un objeto con el año de tu nacimiento y suma tu edad
nacimiento <- 1989
nacimiento + 34
## 2. Borra el objeto
rm(nacimiento)
## 3. Crea un vector con el apellido de los últimos 5 presidentes de tu país
presidentes <- c("Batlle", "Vázquez", "Mujica", "Vázquez", "Lacalle Pou")
## 4. Crea un vector los números enteros que van del 0 al 35 y otro con los
# números de 0 a 100  que son múltiplos de 5
numeros_35 <- c(0:35)
numeros_100 <- seq(0, 100, 5)
## 5. Averigua el tipo de los vectores y comprueba que sean los correctos
class(presidentes) # El vector de los presidentes debe ser de tipo "character"
class(numeros_35) # El vector de 0 a 35 debe ser numérico (integer o double)
class(numeros_100) # El vector de 0 a 100 debe ser numérico (integer o double)
rm(list=ls())
load("C:/Users/elina/Downloads/01_AAA_resultsAll_Elina_Barrios.RData")
View(estimaciones)
View(estimaciones)