Publications by Hugo Tintinago - 1633285

Ejercicio 2

02.09.2020

A continuaciòn se analizarà una serie de tiempo data("USAccDeaths") USAccDeaths ## Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec ## 1973 9007 8106 8928 9137 10017 10826 11317 10744 9713 9938 9161 8927 ## 1974 7750 6981 8038 8422 8714 9512 10120 9823 8743 9129 8710 8680 ## 1975 8162 7306 8...

1454 sym R (799 sym/8 pcs) 4 img

Primer ejercicio R

02.09.2020

Rèplica sobre como crear un documento en Markdown En este documento analizaremos algunas variables de una base de datos brindada por R Studio. Podemos observar del histograma que la variable de los pasajeros àereos se comporta de manera descendente, la frecuencia con la que vuelan gran cantidad de pasajeros es menor, es decir, que hay mas frec...

560 sym R (103 sym/1 pcs) 1 img

Tarea No. 3

30.09.2020

library(ggplot2) Tarea No. 3 En el siguiente ejercicio, crearemos una muestra de mil puertas, las cuales detràs de ellas tendremos un premio, los premios estaràn marcados con un signo positivo, mientras que las que tengan el signo negativo, seràn las puertas perdedoras. puertas=sample(c(rep("+",60),rep("-",940))) puertas ## [1] "-" "-" "...

736 sym R (44798 sym/21 pcs) 2 img

Segunda tarea.

15.09.2020

Ejercicio data("iris") head(iris) ## Sepal.Length Sepal.Width Petal.Length Petal.Width Species ## 1 5.1 3.5 1.4 0.2 setosa ## 2 4.9 3.0 1.4 0.2 setosa ## 3 4.7 3.2 1.3 0.2 setosa ## 4 4.6 3.1 1.5 0.2 s...

990 sym R (1020 sym/10 pcs) 5 img

Ejercicio 4

15.10.2020

Tarea 4 gràficas serie de tiempo. library(readr) GC_F <- read_csv("C:/Users/usuario/Desktop/GC=F.csv", col_types = cols(Open = col_number(), High = col_number(), Low = col_number(), Close = col_number(), `Adj Close` = col_number(), Volume = col_number())) ## Warning: 3312 parsing failures. ## row col e...

47 sym R (32868 sym/24 pcs) 4 img

Tarea No. 6

12.11.2020

Tarea 6 Tasa de alfabetismo vs tasa de desempleo. En este caso se analizarà la relaciòn que tienen la tasa de alfabetizaciòn en mujeres con la tasa de desempleo de las mismas en Europa central desde el año 1991 hasta el 2016. library(readxl) DATOS <- read_excel("DATOS.xlsx") View(DATOS) head(DATOS) ## # A tibble: 6 x 3 ## AÑO `TASA DE...

728 sym R (1718 sym/10 pcs) 1 img

Tarea No. 5

12.11.2020

Tarea 5 \[P(x)=\frac{e^{-λ}.λ^x}{x!}\] \[E(X)=\displaystyle\sum_{x=0}^{∞} x . P(x) \] \[E(X)=\displaystyle \sum_{x=0}^{∞} x \frac{e^{-λ}.λ^x}{x!}\] Como \(\frac {x}{x!}=\frac {1}{(x-1)!}\) \[E(X)=\displaystyle \sum_{x=0}^{∞} \frac{e^{-λ}.λ^x}{(x-1)!}\] \[E(X)=\displaystyle λ \sum_{x=0}^{∞} \frac{e^{-λ}.λ^x}{(x-1)!}\] Cambiando ...

831 sym R (519 sym/8 pcs) 1 img