Análisis de datos estadísticos en R

.pull-right.small[
**Profesora** Valentina Andrade de la Horra <br>
**Ayudantes** Dafne Jaime y Nicolás Godoy
.tiny[Universidad Alberto Hurtado<br>
]
]

]

---

# Contenidos

.box-1.medium.sp-after-half[R **enviroment**]

.box-3.medium.sp-after-half[R **consulta**]

.box-7.medium.sp-after-half[R **comunicación**]

.box-6.medium.sp-after-half[Detalles del curso]

---
name: outline
class: title title-inv-8

# Introducción

.box-8.medium.sp-after-half[¿Y no bastaba aprender SPSS?]

--
.center[
![](data:image/png;base64,#https://64.media.tumblr.com/fd06b6c228042758ca3fdbc739921bcb/tumblr_mqlyveFRp61s9zc2po1_500.gifv)
]

---
name: outline
class: title title-inv-8

# Introducción

.box-8.medium.sp-after-half[El contexto del curso]

.pull-left.box-1.center[Mayor uso de R en las ciencias <br>

También en las **ciencias sociales**]

.pull-right.box-7.center[Las universidades incluyen cada vez más este software y otros en sus planes de estudio]

---
name: outline
class: title title-inv-8

---
name: outline
class: title title-inv-8

# Razones: empleabilidad

.pull-left.code[

.small[
<img src="data:image/png;base64,#01-slides_files/figure-html/razones-1.png" width="1440" style="display: block; margin: auto;" />
]]
--

.pull-right.code[

.box-2[Ustedes en la vida real]
.center[
<figure>
  <img src="img/01/empleabilidad.jpg" alt="Nate Breznau again" width="70%">
</figure>]
]
---
name: outline
class: title title-inv-8

.pull-left.code[
<figure>
  <img src="img/01/repro-ine.jpg" alt="INE" width="90%">
</figure>
]

.pull-right.code[
<figure>
  <img src="img/01/repro-manza-brooks.jpg" alt="Nate Breznau again" width="90%">
</figure>
]

---
name: outline
class: center middle section-title section-title-8 animated fadeIn

# ¿Qué tiene que ver todo esto con R? 🤔

---
name: outline
class: title title-inv-8

- Una herramienta de "ambiente" (*R enviroment*):

- Cada vez más uso en Chile 🇨🇱

- Pero no necesariamente con un propósito de "ciencia abierta" 👎

---
name: outline
class: title title-inv-8

.small[
# Experiencia tradicional sobre R
]
.center[
<div id="htmlwidget-b63debdcf3c67f8c6571" style="width:504px;height:504px;" class="wordcloud2 html-widget"></div>
<script type="application/json" data-for="htmlwidget-b63debdcf3c67f8c6571">{"x":{"word":["Estadística","Necesario","Cuantitativo","Accesible","Gratis","Versátil","Difícil","Sencillo","Incomprensible"],"freq":[37,34,30,23,20,13,10,3,1],"fontFamily":"Segoe UI","fontWeight":"bold","color":"random-dark","minSize":0,"weightFactor":4.86486486486486,"backgroundColor":"white","gridSize":0,"minRotation":-0.785398163397448,"maxRotation":0.785398163397448,"shuffle":true,"rotateRatio":0.4,"shape":"circle","ellipticity":0.65,"figBase64":null,"hover":null},"evals":[],"jsHooks":{"render":[{"code":"function(el,x){\n                        console.log(123);\n                        if(!iii){\n                          window.location.reload();\n                          iii = False;\n\n                        }\n  }","data":null}]}}</script>
*Tal como ustedes mismos la cuentan*]
---
name: outline
class: title title-inv-8

.small[
# R: una herramienta para la ciencia abierta
]
.box-7-inv[La colaboración y trabajo en equipo **facilita el aprendizaje**]

.small.center[
<figure>
  <img src="img/01/equipo.gif"width="40%">
</figure>
]
---
name: outline
class: title title-inv-8
.small[
# Componente humano: el equipo del curso

]
---
name: outline
class: title title-inv-8

]

---
layout: false
name: ds-ps
class: center middle section-title section-title-1 animated fadeIn

.center[
<figure>
  <img src="https://c.tenor.com/Ws34sHrHC-8AAAAC/monsters-inc-sully.gif" width="50%">
</figure>
]

# ¡ Vamos a conocerlas!
---
layout: false
name: ds-ps
class: center middle section-title section-title-1 animated fadeIn

# 1. R<br>enviroment

---
name: ds-ps
class: title title-1

# 1.1 ¿Qué es R?

.box-inv-1[R es un **lenguaje** y un **ambiente** dentro del cual técnicas **estadísticas pueden ser implementadas**]

---
class: title title-1

# 1.1 ¿Qué es R?

--
.box-4[ (2) Permite cálculos y visualización de datos]

--
.box-5[ (3) Es coherente y capaz de integrarse con otras herramientas]

.box-7[ (5) Gracias a la colaboración, sus potenciales pueden ser extendidos a partir de **paquetes**]

---

class: bg-full
background-image: url("data:image/png;base64,#img/01/terminal-r.jpg")

???

---

.center[
![](data:image/png;base64,#img/01/ver-consola.jpg)
]
---
name: ds-ps
class: center middle section-title section-title-1 animated fadeIn

.box-1-inv.large[# Tranquilidad, espera un segundo . . . 🥁]

---
name: ds-ps
class: center middle section-title section-title-1 animated fadeIn

![](data:image/png;base64,#img/01/rstudio-logo.png)

# 1.1 RStudio

-  Integra lenguaje R con diferentes herramientas para facilitar su uso:

.pull-left.center[
.box-inv-2[(1) Consola]
<figure>
  <img src="img/01/consola.jpg">
</figure>
]

.pull-left.center[
.box-inv-2[(2) Editor de sintaxis (código)]
<figure>
  <img src="img/01/script.jpg">
</figure>
]

---
class: title title-1

# 1.1 RStudio

.pull-left.small[
.box-inv-2[(3) Enviroment ]
<figure>
  <img src="img/01/enviroment.jpg">
</figure>
]

.pull-right.small[
.box-inv-2[(4) Workspace]
<figure>
  <img src="img/01/files.jpg">
</figure>
]

---
class: title title-1

# 1.1 RStudio

.pull-middle.small[
.box-inv-2[(5) Plot, debugging (bugs o errores), historia]
<figure>
  <img src="img/01/plots.jpg">
</figure>
]

---
name: ds-ps
class: center middle section-title section-title-1 animated fadeIn

.box-inv-1[ Opción (1) con RStudio: [descargar el zip en el sitio del curso]((https://learn-r-uah.netlify.app/content/01-content/)]
]

.box-inv-1[ Opción (2) con RStudio Cloud: [ir al RStudio del curso]((https://rstudio.cloud/spaces/60366/join?access_code=iSzSuF94ZXVUL53mJEyhOvtKVAActaw0nQ8S%2FxAB)]

---
layout: false
name: evidence-evaluation-causation
class: center middle section-title section-title-3 animated fadeIn

# ¡Para tantas preguntas, *casi* **siempre** hay respuestas!

---
layout: false
name: evidence-evaluation-causation
class: center middle section-title section-title-3 animated fadeIn

# 2. R consulta

---
layout: true
class: title title-3

---

# Una de las claves para aprender R

---

# R consultas

.box-inv-3.medium[Gracias a su carácter abierto y colaborativo]

.box-inv-3.medium.sp-after[Existe una **gran** comunidad de usuarios que contestan dudas ]

.box-3.medium[O incluso que hacen talleres masivos]

???

Rladies, userR

---
# 2.1 ¿Dónde consultar en R? 
.box-inv-3[(o mejor dicho **buscar respuestas**)]

.pull-left-code[<figure>
  <img src="img/01/stackoverflow.png" width="30%">
</figure>
.box-inv-3.small[Stackoverflow ➡ sobre códigos en general]]

.pull-left-code[<figure>
  <img src="img/01/rstudiocom-logo.png" width="30%">
</figure>
.box-inv-3.small[RStudio Community ➡ más específica]]

???

- https://stackoverflow.com/

-- https://stackoverflow.com/questions/33026167/reading-sav-file-into-r

- https://community.rstudio.com/t/help-with-filter-and-select-function/15843

- https://cran.r-project.org/: abordaremos este más la próxima sesión/ y rdocumentation

---

# Ventajas

.box-inv-3.medium[(1) Las preguntas y respuestas están evaluadas]

.box-inv-3.medium[(2) Las preguntas y respuestas son reproducibles]

.box-inv-3.medium[(3) Las preguntas y respuestas tienen fecha]

.box-inv-6.medium[Desventaja : están en inglés]

???

---

&nbsp;

.box-3.large[¿Dónde **evitar** preguntar y buscar respuestas?]

.box-inv-3.medium[Esto se llama *"usted no lo haga"*]

---
layout: true
class: title title-3

---
# Ustedes no lo hagan 😥

.pull-left.center[
<figure>
  <img src="img/01/pregunta-facebook.jpg"  width="100%">
</figure>
]

.pull-right.center[
<figure>
  <img src="img/01/preguntas-facebook.jpg" width="100%">
</figure>
]

---

# Acompáñenme a ver esta triste historia 😥

???

https://mail.google.com/mail/u/0/#search/formspree/FMfcgzGkXdCRnlcDCRmwQXXpbHzhtzdJ

---
# En síntesis

✅ Parta por buscar su error y consulta

✅ Prefiera stackoverflow y RStudio Community

✅ Si aún tienes dudas pregúntale a alguien especializado.

✅ Se lo más específico posible, 🙏 envíes pantallazos🙏

---
layout: false
name: evidence-evaluation-causation1
class: center middle section-title section-title-6 animated fadeIn

# Y tranquila/o, no estarás sola/o en este proceso

---
name: evidence-evaluation-causation
class: center middle section-title section-title-6 animated fadeIn

# R colaboración y comunicación

---
name: evidence-evaluation-causation
class: center section-title section-title-6 animated fadeIn

# R comunicación

--
.tiny[
.pull-left[<figure>
  <img src="img/01/slack-logo.png" width="30%">
</figure>
.box-inv-3.medium[Slack ➡ canal de comunicación del curso]]

.pull-right[<figure>
  <img src="img/01/github-logo.png" width="30%">
</figure>
.box-inv-3.medium[GitHub ➡ control de cambios de códigos]]

.pull-medium[<figure>
  <img src="img/01/rprojects.jpg" width="10%">
</figure>
.box-inv-3.medium[Rprojects ➡  projecto con su propio ambiente]
]
]

---
layout: true
class: title title-6

---
# 11. Rprojects

- Permite crear un **directorio propio** 🌱 para un proyecto

- Este directorio propio podrá contener **todos** los recursos que utilizas para tu proyecto (sintaxis, datos, figuras)

---
# 1. Rprojects

- Sirve para esclarecer los flujos de trabajos

![:scale 80%](data:image/png;base64,#img/01/flow-rprojects.png)
---
# 1. RProjects

- Evita errores de definición de espacio de trabajo (*Working directory*)

```r
*datos <- read.csv("datos.csv")
```

```
## Error in file(file, "rt"): no se puede abrir la conexión
```

- Un error muy **clásico** 😖

---
# 1. RProjects

- En caso contrario hay que ser unos detectives de rutas de los archivos🕵️‍♀️😂

```r
*datos <- read.csv("ruta_hacia_los_datos/datos.csv")

datos <- read.csv("c: mi computador/carpeta datos/mi proyecto del curso/datos.csv")
```

---
# 1. Rprojects

- Sirve para esclarecer los flujos de trabajos

![:scale 80%](data:image/png;base64,#img/01/rprojects-carpetas.png)
---
class: center middle section-title section-title-6 animated fadeIn

# ¡Vamos a ver cómo se hacen los .Rproject! 🧐

---
class: center middle section-title-inv-6 section-title-inv-6 animated fadeIn

# ¿ Y qué pasa si trabajo con más personas a la vez? 🤔

---

.box-6[Evidentemente compartir todos los archivos y "simular" un mismo ambiente de trabajo ayuda mucho a trabajar en equipo]

.box-inv-6.large[**¡Sí**!]

---
class: title title-6

# 2. GitHub
.center[
![](data:image/png;base64,#img/01/meme-orden-versiones.jpg)]
---
class: title title-inv-6

# 2. GitHub

- Es un **Sistema de control de versiones** (*VCS*)

**Permite**

☑ Almacenaje de código

☑ Historial de cambios

☑ Trabajo en equipo

---
class: title title-6

# 2. El flujo de GitHub

![:scale 90%](data:image/png;base64,#img/01/flow-github.png)

---
class: center section-title section-title-6 animated fadeIn

# ¡Vamos cómo es GitHub!

???

https://guides.github.com/introduction/flow/

---
class: center section-title section-title-6 animated fadeIn

# Paso a paso iremos asimilando estos programas

## ¡De hecho el [práctico N°1](https://learn-r-uah.netlify.app/example/01-practico/) está orientado principalmente a estas herramientas!

---
class: center section-title section-title-1 animated fadeIn

# En síntesis

.box-1.medium.sp-after-half[R **enviroment**]

.box-3.medium.sp-after-half[R **consulta**]

.box-7.medium.sp-after-half[R **comunicación**]

---
class: title title-1

# En síntesis
.center[
![:scale 20%](data:image/png;base64,#img/01/meme-expa.jpg)]
---

layout: false
name: class-details
class: center middle section-title section-title-7 animated fadeIn

# Detalles del curso

---

---

# Plan del curso

.center[
<figure>
  <img src="img/01/eval-flowchart.png" alt="Class flowchart" title="Class flowchart" width="100%">
</figure>
]

---

# Organización

.pull-left-7.center[
<figure>
  <img src="img/01/flow-class.png" title="Clases" width="90%">
</figure>
]

---

# Evaluaciones

| Evaluación    | Formato       | Fecha |  Ponderación Nota Final   |
| ------------- |:-------------:| -----:| -------------------:|
| Tarea         | 4 tareas   | *Hasta Viernes de la semana informada* | 70% (25% c/u)|
| Investigación | Única entrega | 22 de noviembre  | 30% |

-  A lo largo del semestre deberá entregar 6 tareas: 5 calificadas (Tarea 1 a Tarea 5) y 1 no (Tarea 0). De las 5 tareas restantes, solo las 4 mejores serán consideradas en su promedio de las tareas.]

---

# Convivencia virtual

![](data:image/png;base64,#img/01/convencia.png)

---

# Recursos del curso

<figure>
  <img src="img/01/rstudio-logo.png" alt="RStudio logo" title="RStudio logo" width="50%">
</figure>
]

---

# Recursos del curso

---

# Recursos del curso
.center[
![](data:image/png;base64,#img/01/pagina-curso.jpg)
]

---

# ¿Los haré científicos de datos?

.box-inv-7.huge[**No!**]

???

https://twitter.com/ameliaritger/status/1214682596182904832?s=12

Drivers, mecanicos, ingenieros. 
No necesitas ser mecanico para tener licencias... pero si lo necesitaras si quieres cambiar cosas en tu auto. Tampoco necesitas ser ingeniero/a, solo si quieres crear algo nuevo (al menos en ciencias sociales)

https://twitter.com/Sumidu/status/1214695065387438083

---

.box-7.huge[¡Tú puedes! (podremos juntas/os)]

---

---

# Y con esto lograrás

.center[
<figure>
  <img src="img/01/eval-flowchart.png" alt="Class flowchart" title="Class flowchart" width="100%">
</figure>
]

---

# Pre-requisitos

.box-7.small[**Herramientas tecnológicas**]

.box-inv-7.small.sp-after[Un computador e internet]

.box-7.small[**Habilidades de la ciencia computacional**]

.box-inv-7.small.sp-after[No]

.box-7.small[**Habilidades estadísticas**]

.box-inv-7.small[Estadística descriptiva, inferencial y regresiones]

---
layout: false
class: bg-full animated fadeIn title-1
background-image: url("data:image/png;base64,#img/01/r.gif")

# ¡Y muchas ganas de aprender!

---
layout: false

.center[
![](data:image/png;base64,#img/01/monster-inc-2.gif)]
---
layout: false
class: center middle main-title section-title-1 top-logo

.pull-right.small[
**Profesora** Valentina Andrade de la Horra <br>
**Ayudantes** Dafne Jaime y Nicolás Godoy
.tiny[Universidad Alberto Hurtado<br>
]
]

]