x <- 3 y <- 2
x y
suma <- x+y suma
resta <- x-y resta
multiplicacion <- x * y multiplicacion
division <- x/y division
division_entera <- x%/%y division_entera
residuo <- x%%y residuo
potencia <- x**2 #Tamien se puede con simbolo de potencia potencia
#Funciones Matematicas raiz_cuadrada <- sqrt(x) raiz_cuadrada
raiz_cubica <- x**(1/3) raiz_cubica
exponencial <- exp(1) exponencial
absoluto <- abs(x) #Quita el negativo absoluto
signo <- sign(x) #Signo de X signo
redondeo__arriba <- ceiling(division) redondeo_arriba
redondeo__abajo<- floor(division) redondeo_abajo
truncar <- trunc(division) truncar
#Constantes
pi radio <- 5 area_circulo <- pi*radio**2 area_circulo
#Vectores
a <- c(1,2,3,4,5) #Juntarlos a
b <- c(1:100) #Sequencia de enteros b
c <- seq(2,5,by=0.5) #Sequencia especifica c
d <- rep(1:2, times=3) #Repetir vector d
e <- rep(1:2, each=3) #Repetir elementos e
f <- c(“pera”, “manzana”, “kiwi”, “fresa”) f
longitud <- length(a) longitud
promedio <- mean(a) promedio
rango <- max(a)-min(a) rango
resumen <- summary(a) resumen
orden_ascendente <- sort(a) orden_ascendente
orden_descendent <- sort(a, decreasing=TRUE) orden_descendent
g <- c(1,2,3,4,5)
suma_vectores <- a+g suma_vectores
#Caracter: Palabras, van siempre entre comillas. #Numericos: Numeros. #Logicos: TRUE, FALSE. #Factores: Niveles preestablecidos ´1´ ´0´´ #Para convertir as_numeric
#Graficas plot(a,g, main=“Ventas por mes”, xlab=“Mes”, ylab=“M USD”, 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 calificacion <- 68 if (calificacion>=70){ print(“Pasa”) } else { print(“No pasa”) }
tabla <- data.frame(x,g) tabla
#Ejercicio 1 #Registra el nombre, peso, altura de alumnos #Calcula su IMC y asigna su categoria
nombre <- c(“Gabo”, “Fede”, “Danara”, “Mayte”) peso <-