Comandos básicos

Comandos básicos

Asignación de variables

x <- 3
y <- 2

Impresión de Resultado

x

## [1] 3

## [1] 3
y

## [1] 2

## [1] 2

Operaciones aritméticas

suma <- x + y
suma

## [1] 5

## [1] 5
resta <- x - y
resta

## [1] 1

## [1] 1
multiplicacion <- x * y
multiplicacion

## [1] 6

## [1] 6
division <- x / y
division

## [1] 1.5

## [1] 1.5
division_entera <- x %/% y
division_entera

## [1] 1

## [1] 1
residuo <- x %% y
residuo

## [1] 1

## [1] 1
potencia <- x ** 2
potencia

## [1] 9

## [1] 9

Funciones matemáticas

raiz_cuadrada <- sqrt(x)
raiz_cuadrada

## [1] 1.732051

## [1] 1.732051
raiz_cubica <- x ** (1 / 3)
raiz_cubica

## [1] 1.44225

## [1] 1.44225
exponencial <- exp(1)
exponencial

## [1] 2.718282

## [1] 2.718282
absoluto <- abs(x)
absoluto

## [1] 3

## [1] 3
signo <- sign(x)
signo

## [1] 1

## [1] 1
redondeo_arriba <- ceiling(x / y)
redondeo_arriba

## [1] 2

## [1] 2
redondeo_abajo <- floor(x / y)
redondeo_abajo

## [1] 1

## [1] 1
truncar <- trunc(x / y)
truncar

## [1] 1

## [1] 1

Constantes

pi

## [1] 3.141593

## [1] 3.141593
radio <- 5
area_circulo <- pi * radio ** 2
area_circulo

## [1] 78.53982

## [1] 78.53982

Vectores

a <- c(1, 2, 3, 4, 5)
a

## [1] 1 2 3 4 5

## [1] 1 2 3 4 5
nombre <- c("Jose", "Ana", "Juan")
nombre

## [1] "Jose" "Ana"  "Juan"

## [1] "Jose" "Ana"  "Juan"
longitud <- length(a)
longitud

## [1] 5

## [1] 5
longitud_nombre <- length(nombre)
longitud_nombre

## [1] 3

## [1] 3
promedio <- mean(a)
promedio

## [1] 3

## [1] 3
resumen <- summary(a)
resumen

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##       1       2       3       3       4       5

##    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

## [1] 1 2 3 4 5
orden_descendente <- sort(a, decreasing = TRUE)
orden_descendente

## [1] 5 4 3 2 1

## [1] 5 4 3 2 1

b <- c(1, 2, 3, 4, 5)
b

## [1] 1 2 3 4 5

## [1] 1 2 3 4 5
suma_vectores <- a + b
suma_vectores

## [1]  2  4  6  8 10

## [1]  2  4  6  8 10

Gráficos

plot(a, b, main = "Ventas Totales", xlab = "Semana", ylab = "Millones USD", type = "b")

Ejercicio 1

Nombres <- c("Antonio", "Alfonso", "Paulina", "Chofis", "Adrian")
Nombres

## [1] "Antonio" "Alfonso" "Paulina" "Chofis"  "Adrian"

## [1] "Antonio", "Alfonso", "Paulina", "Chofis", "Adrian"
Altura <- c(1.77, 1.82, 1.62, 1.57, 1.72)
Altura

## [1] 1.77 1.82 1.62 1.57 1.72

## [1] 1.77 1.82 1.62 1.57 1.72
Peso <- c(86, 73, 62, 50, 86)
Peso

## [1] 86 73 62 50 86

## [1] 86 73 62 50 86
Indice_MasaCorporal <- c(Peso / Altura ** 2)
Indice_MasaCorporal

## [1] 27.45060 22.03840 23.62445 20.28480 29.06977

## [1] 27.45060 22.03840 23.62445 20.28480 29.06977
resumen <- summary(Indice_MasaCorporal)
resumen

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   20.28   22.04   23.62   24.49   27.45   29.07

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   20.28   22.04   23.62   24.49   27.45   29.07

Grafica

plot(Altura, Peso, main = "IMC", xlab = "Altura", ylab = "Peso", type = "b")

Conclusión

En este código de R nos encagargamos de realizar comandos básicos de R como hacer operaciones aritméticas, asignar variables, realizar funciones como raíces cuadradas, exponenciales, valores absolutos, etc. Hicimos uso de constantes como Pi a la hora de obtener el área de un círculo, trabajamos con vectores los cuales nos ayudaron a obtener estadísticas como longitud y promedio de distintos datos. Despues hicimos uso de funciones de R para crear gráficos de datos bidimensionales donde pudimos ver de una manera mas general el IMC de todos los integrantes del equipo el cual tambien fue el ejercicio final y que con éxito pudimos poner la altura y peso de todos para obtener su IMC.