Asignación de variables

x <- 3
y <- 2

Impresión de resultados 

x
## [1] 3
y
## [1] 2

Operaciones aritméticas

suma <- x+y
suma
## [1] 5
resta <- x-y
resta
## [1] 1
multiplicacion <- x*y
multiplicacion
## [1] 6
division <- x/y
division
## [1] 1.5
division_enteros <- x%/%y
division_enteros
## [1] 1
residuo <- x%%y
residuo
## [1] 1
potencia <- x^2 #o con **
potencia
## [1] 9

Funciones matemáticas

raiz_cuadrada <- sqrt(x)
raiz_cuadrada
## [1] 1.732051
raiz_cubica <- x^(1/3)
raiz_cubica
## [1] 1.44225
exponencial <- exp(1)
exponencial
## [1] 2.718282
absoluto <- abs(x)
absoluto
## [1] 3
signo <- sign(x) #1 para positivo -1 para negativo 0 para sin signo que es 0
signo
## [1] 1
redondeo_arriba <- ceiling(division)
redondeo_arriba
## [1] 2
redondeo_abajo <- floor(division)
redondeo_abajo
## [1] 1
truncar <- trunc(division)
truncar
## [1] 1

Constantes

pi
## [1] 3.141593

Vectores

a <- c(1:5) #o manual listando los numeros individualmente
a
## [1] 1 2 3 4 5
b <- seq(2,5,by=0.5) #secuencia de - en -
b
## [1] 2.0 2.5 3.0 3.5 4.0 4.5 5.0
c <- rep(1:2, times=3) #repetir vector
c
## [1] 1 2 1 2 1 2
d <- rep(1:2, each=3) #repetir elementos
d
## [1] 1 1 1 2 2 2
longitud <- length(a)
longitud
## [1] 5
promedio <- mean(a)
promedio
## [1] 3
rango <- max(a) - min(a)
rango
## [1] 4
resumen <- summary(a)
resumen
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##       1       2       3       3       4       5
orden_ascendente <- sort(a)
orden_ascendente
## [1] 1 2 3 4 5
orden_descendente <- sort(a, decreasing=TRUE)
orden_descendente
## [1] 5 4 3 2 1
g <- c(6:10)

suma_vectores <- a+g
suma_vectores
## [1]  7  9 11 13 15

Tipos de datos

#Caracter: palabras, van entre comillas
#Numéricos: numeros
#Lógicos: verdadero o falso (TRUE, FALSE)
#Factores: niveles preestablecidos (con opciones)
#as. para convertir entre datos

Graficas 

plot(a,g, main="Ventas por mes", xlab="Mes", ylab="Millones de dólares", type="b")

Operadores relacionales

#Igual a==b
#Desigual a!=b
#Mayor que a>b
#Menor que a<b
#Mayor o igual que a>=b
#Menor o igual que a<=b

Condicionales

calif <- 89
if (calif>=70){
  print("Pasa")
  } else{
  print("No pasa")
}
## [1] "Pasa"

Tablas

df <- data.frame(a,g)
df
##   a  g
## 1 1  6
## 2 2  7
## 3 3  8
## 4 4  9
## 5 5 10

Ejercicio 1

#Registra nombre, peso, altura
#calcula IMC y calcula categoria

nombres <- c("Ana", "Natalia", "Johana", "Paula")
peso <- c(55, 65, 56, 70)
altura <- c(1.75, 1.60, 1.55, 1.70)

imc <- peso/(altura**2)

df <- data.frame(nombres, peso, altura, imc)

df$clasificacion <- ifelse(df$imc<18.5, "Peso Bajo", 
                           ifelse(df$imc<=24.9,"Normal",
                                  ifelse(df$imc<=30,"Obesidad",
                                         ifelse(df$imc<=35,"Obesidad grado 1",
                                                ifelse(df$imc<=40,"Obesidad grado 2")))))