
Asignacion de Variables
x<- 2
y<- 3
Impresion de Resultados
x
## [1] 2
y
## [1] 3
Operaciones Aritmeticas
suma <- x+y
suma
## [1] 5
division <- x/y
division
## [1] 0.6666667
Funciones matematicas
raiz_cuadrada <- sqrt(x)
raiz_cuadrada
## [1] 1.414214
z <- -3
z
## [1] -3
absoluto <- abs(z)
absoluto
## [1] 3
signo <- sign(z)
signo
## [1] -1
signo2 <- sign(x)
signo2
## [1] 1
redondeo_arriba <- ceiling(division)
redondeo_arriba
## [1] 1
redondeo_abajo <- floor(division)
redondeo_abajo
## [1] 0
Vectores
a <- c(1,2,3,4,5)
a
## [1] 1 2 3 4 5
longitud <- length(a)
longitud
## [1] 5
promedio <- mean(a)
promedio
## [1] 3
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_descenedente <- sort(a, decreasing =TRUE)
orden_descenedente
## [1] 5 4 3 2 1
?sort
b <- c(6,7,8,9,10)
b
## [1] 6 7 8 9 10
suma_vectores <- a+b
suma_vectores
## [1] 7 9 11 13 15
Graficas
plot(a,b, type = "b", main = "Ventas por Mes", xlab = "Mes",ylab="M USD")

#?plot
Conclusiones
En este trabajo se pueden visualizar los comandos basicos de R para
asignar variables, impfimir resultados, realizar operaciones aritmeticas
y funciones matematicas, operar vectores y generar graficas.
LS0tCnRpdGxlOiAiQ29tYW5kb3NfQmFzaWNvcyIKYXV0aG9yOiAiTWFyY29fR29uemFsZXpfQTAwODM0ODk1IgpkYXRlOiAiMjAyMy0wMy0yMSIKb3V0cHV0OiAKICBodG1sX2RvY3VtZW50OgogICAgdG9jOiB0cnVlCiAgICB0b2NfZmxvYXQ6IHRydWUKICAgIGNvZGVfZG93bmxvYWQ6IHRydWUKLS0tCiFbXSgvVXNlcnMvbWFyY29nb256YWxlei9EZXNrdG9wL3BuZy10cmFuc3BhcmVudC1tYXRoZW1hdGljYWwtbm90YXRpb24tbWF0aGVtYXRpY3Mtc3ltYm9sLWFyaXRobWV0aWMtbXVsdGlwbHktcy1tdWx0aXBsaWNhdGlvbi1zdW1tYXRpb24tYWRkaXRpb24ucG5nKQoKIyMgQXNpZ25hY2lvbiBkZSBWYXJpYWJsZXMKYGBge3J9Cng8LSAyCnk8LSAzCmBgYAoKIyMgSW1wcmVzaW9uIGRlIFJlc3VsdGFkb3MKYGBge3J9CngKeQpgYGAKCiMjIE9wZXJhY2lvbmVzIEFyaXRtZXRpY2FzCmBgYHtyfQpzdW1hIDwtIHgreQpzdW1hCgpkaXZpc2lvbiA8LSB4L3kKZGl2aXNpb24KYGBgCgojIyBGdW5jaW9uZXMgbWF0ZW1hdGljYXMKYGBge3J9CnJhaXpfY3VhZHJhZGEgPC0gc3FydCh4KQpyYWl6X2N1YWRyYWRhCgp6IDwtIC0zCnoKCmFic29sdXRvIDwtIGFicyh6KQphYnNvbHV0bwoKc2lnbm8gPC0gc2lnbih6KQpzaWdubwoKc2lnbm8yIDwtIHNpZ24oeCkKc2lnbm8yCgpyZWRvbmRlb19hcnJpYmEgPC0gY2VpbGluZyhkaXZpc2lvbikKcmVkb25kZW9fYXJyaWJhCgpyZWRvbmRlb19hYmFqbyA8LSBmbG9vcihkaXZpc2lvbikKcmVkb25kZW9fYWJham8KYGBgCgojIyBWZWN0b3JlcwpgYGB7cn0KYSA8LSBjKDEsMiwzLDQsNSkKYQoKbG9uZ2l0dWQgPC0gbGVuZ3RoKGEpCmxvbmdpdHVkCgpwcm9tZWRpbyA8LSBtZWFuKGEpCnByb21lZGlvCgpyZXN1bWVuIDwtIHN1bW1hcnkoYSkKcmVzdW1lbgoKb3JkZW5fYXNjZW5kZW50ZSA8LSBzb3J0KGEpCm9yZGVuX2FzY2VuZGVudGUKCm9yZGVuX2Rlc2NlbmVkZW50ZSA8LSBzb3J0KGEsIGRlY3JlYXNpbmcgPVRSVUUpCm9yZGVuX2Rlc2NlbmVkZW50ZQoKP3NvcnQKCmIgPC0gYyg2LDcsOCw5LDEwKQpiCgpzdW1hX3ZlY3RvcmVzIDwtIGErYgpzdW1hX3ZlY3RvcmVzCmBgYAoKIyMgR3JhZmljYXMKYGBge3J9CnBsb3QoYSxiLCB0eXBlID0gImIiLCBtYWluID0gIlZlbnRhcyBwb3IgTWVzIiwgeGxhYiA9ICJNZXMiLHlsYWI9Ik0gVVNEIikKIz9wbG90CmBgYAoKCiMjIENvbmNsdXNpb25lcwpFbiBlc3RlIHRyYWJham8gc2UgcHVlZGVuIHZpc3VhbGl6YXIgbG9zIGNvbWFuZG9zIGJhc2ljb3MgZGUgUiBwYXJhIGFzaWduYXIgdmFyaWFibGVzLCBpbXBmaW1pciByZXN1bHRhZG9zLCByZWFsaXphciBvcGVyYWNpb25lcyBhcml0bWV0aWNhcyB5IGZ1bmNpb25lcyBtYXRlbWF0aWNhcywgb3BlcmFyIHZlY3RvcmVzIHkgZ2VuZXJhciBncmFmaWNhcy4KCgoKCgoKCg==