Skip to content

Commit

Permalink
new case study
Browse files Browse the repository at this point in the history
  • Loading branch information
dadosdelaplace committed May 21, 2024
1 parent 492dd4c commit b943b22
Show file tree
Hide file tree
Showing 2 changed files with 20 additions and 29 deletions.
33 changes: 15 additions & 18 deletions R-datascience/diapos/index.html
Original file line number Diff line number Diff line change
Expand Up @@ -1348,7 +1348,7 @@ <h2>Planificación</h2>
<td style="text-align: center;">x sep</td>
<td style="text-align: center;">Primeras bases de datos</td>
<td style="text-align: center;"><a href="#/tu-turno-3-1">💻</a> <a href="#/tu-turno-3-2">💻</a> <a href="#/tu-turno-3-3">💻</a></td>
<td style="text-align: center;"><a href="#/caso-practico-3">🐣</a></td>
<td style="text-align: center;"><a href="#/caso-practico-3-1">🐣</a> <a href="#/caso-practico-3-2">🐣</a></td>
<td style="text-align: center;"></td>
<td style="text-align: center;"></td>
<td style="text-align: center;"></td>
Expand Down Expand Up @@ -2565,7 +2565,7 @@ <h2>Variables de fecha</h2>
<div class="cell">
<div class="sourceCode cell-code" id="cb120"><pre class="sourceCode numberSource r number-lines code-with-copy"><code class="sourceCode r"><span id="cb120-1"><a href="#cb120-1"></a><span class="fu">now</span>()</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
<div class="cell-output cell-output-stdout">
<pre><code>[1] &quot;2024-05-21 13:30:24 CEST&quot;</code></pre>
<pre><code>[1] &quot;2024-05-21 13:46:09 CEST&quot;</code></pre>
</div>
</div>
</div>
Expand Down Expand Up @@ -4031,8 +4031,11 @@ <h2>💻 Tu turno (tb/df)</h2>
</div>
</div>
</section>
<section id="caso-practico-3" class="slide level2">
<h2>🐣 Caso práctico</h2>
<section id="caso-practico-3-1" class="slide level2">
<h2>🐣 Caso práctico I: textos</h2>
</section>
<section id="caso-practico-3-2" class="slide level2">
<h2>🐣 Caso práctico II: tibble</h2>
<p>Del paquete <code>Biostatistics</code> usaremos el conunto de datos <code>pinniped</code></p>
<div class="cell">
<div class="sourceCode cell-code" id="cb340"><pre class="sourceCode numberSource r number-lines code-with-copy"><code class="sourceCode r"><span id="cb340-1"><a href="#cb340-1"></a>Biostatistics<span class="sc">::</span>pinniped</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
Expand Down Expand Up @@ -4079,10 +4082,6 @@ <h2>🐣 Caso práctico</h2>
<pre><code>[1] 6</code></pre>
</div>
</div>
</div>
</section>
<section id="caso-práctico-3a-2" class="slide level2">
<h2>🐣 Caso práctico</h2>
<ol start="3" type="1">
<li>Incorpora una <span class="hl-yellow"><strong>variable extra llamada phoca</strong></span> que sea de tipo lógico y que nos diga si una especie es de la categoría <code>Phoca</code> o no.</li>
</ol>
Expand All @@ -4092,6 +4091,7 @@ <h2>🐣 Caso práctico</h2>
<div class="sourceCode cell-code" id="cb349"><pre class="sourceCode numberSource r number-lines code-with-copy"><code class="sourceCode r"><span id="cb349-1"><a href="#cb349-1"></a>pinniped_tb<span class="sc">$</span>phoca <span class="ot">&lt;-</span> pinniped_tb<span class="sc">$</span>Species <span class="sc">==</span> <span class="st">&quot;Phoca&quot;</span></span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
</details>
</div>
</div>
<div class="fragment">
<ol start="4" type="1">
<li>¿A qué sexo le <span class="hl-yellow"><strong>pesa más el cerebro</strong></span>: a las hembras o a los machos? ¿A quienes les <span class="hl-yellow"><strong>pesa más el cuerpo</strong></span>: a los monógamos o a los polígamos?</li>
Expand All @@ -4118,10 +4118,6 @@ <h2>🐣 Caso práctico</h2>
<pre><code>[1] FALSE</code></pre>
</div>
</div>
</div>
</section>
<section id="caso-práctico-3a-3" class="slide level2">
<h2>🐣 Caso práctico</h2>
<ol start="5" type="1">
<li>Incopora una nueva variable que represente la <span class="hl-yellow"><strong>diferencia entre el peso del cerebro entre machos y hembras</strong></span> (machos - hembras) para cada especie.</li>
</ol>
Expand Down Expand Up @@ -4149,6 +4145,7 @@ <h2>🐣 Caso práctico</h2>
# ℹ 2 more variables: phoca &lt;lgl&gt;, dif_m_f &lt;dbl&gt;</code></pre>
</div>
</div>
</div>
</section></section>
<section>
<section id="clase-4" class="title-slide slide level1 center">
Expand Down Expand Up @@ -4383,12 +4380,12 @@ <h2>Evitando bucles</h2>
<span id="cb377-5"><a href="#cb377-5"></a> <span class="at">times =</span> <span class="dv">500</span>)</span></code><button title="Copy to Clipboard" class="code-copy-button"><i class="bi"></i></button></pre></div>
<div class="cell-output cell-output-stdout">
<pre><code>Unit: microseconds
expr min lq mean
y &lt;- x^2 1.681 1.8655 2.001948
for (i in 1:100) { y[i] &lt;- x[i]^2 } 1235.863 1254.3745 1346.174894
median uq max neval
1.968 2.050 6.519 500
1263.128 1281.045 13473.543 500</code></pre>
expr min lq mean median
y &lt;- x^2 1.722 1.927 2.219658 2.009
for (i in 1:100) { y[i] &lt;- x[i]^2 } 1237.216 1248.983 1307.289346 1255.523
uq max neval
2.091 61.377 500
1265.055 3090.498 500</code></pre>
</div>
</div>
</section>
Expand Down
16 changes: 5 additions & 11 deletions R-datascience/diapos/index.qmd
Original file line number Diff line number Diff line change
Expand Up @@ -127,7 +127,7 @@ Se podrán modificar las fechas por saturación con otras asignaturas siempre y
|:------:|:--------:|:--------:|:------:|:------:|:------:|:------:|:------:|:------:|:------:|
| [1](#clase-1) | S1 | x sep | Primeros pasos en R | [💻](#tu-turno-1) | | |
| [2](#clase-2) | S1 | x sep | Tipos básicos de datos y vectores | [💻](#tu-turno-2-1) [💻](#tu-turno-2-2) | [🐣](#caso-practico-2) | |
| [3](#clase-3) | S2 | x sep | Primeras bases de datos | [💻](#tu-turno-3-1) [💻](#tu-turno-3-2) [💻](#tu-turno-3-3) | [🐣](#caso-practico-3) | |
| [3](#clase-3) | S2 | x sep | Primeras bases de datos | [💻](#tu-turno-3-1) [💻](#tu-turno-3-2) [💻](#tu-turno-3-3) | [🐣](#caso-practico-3-1) [🐣](#caso-practico-3-2) | |
| [4](#clase-4) | S2 | x sep | Estructuras de control | [💻](#tu-turno-4-1) [💻](#tu-turno-4-2) | [🐣](#caso-practico-4) | |
| [5](#clase-5) | S3 | x sep | Elaborar apuntes y simulacro de entrega | [💻](#tu-turno-5-1) [💻](#tu-turno-5-2) | [🐣](#caso-practico-5) | |
| [6](#clase-6) | S3 | x sep | Entrega I | | | 🎯 15% |
Expand Down Expand Up @@ -2688,8 +2688,11 @@ names(airquality_tb) <- c("ozono", "rad_solar", "viento", "temp", "mes", "dia")

---

## 🐣 Caso práctico I: textos {#caso-practico-3-1}

## 🐣 Caso práctico {#caso-practico-3}
---

## 🐣 Caso práctico II: tibble {#caso-practico-3-2}

Del paquete `Biostatistics` usaremos el conunto de datos `pinniped`

Expand Down Expand Up @@ -2725,11 +2728,6 @@ ncol(pinniped_tb)
```


---

## 🐣 Caso práctico {#caso-práctico-3a-2}


3. Incorpora una [**variable extra llamada phoca**]{.hl-yellow} que sea de tipo lógico y que nos diga si una especie es de la categoría `Phoca` o no.

```{r}
Expand All @@ -2754,10 +2752,6 @@ mean(c(pinniped_tb$Male_mass_Kg[pinniped_tb$Mate_type == "mono"],
pinniped_tb$Female_mass_Kg[pinniped_tb$Mate_type == "poly"]))
```

---

## 🐣 Caso práctico {#caso-práctico-3a-3}


5. Incopora una nueva variable que represente la [**diferencia entre el peso del cerebro entre machos y hembras**]{.hl-yellow} (machos - hembras) para cada especie.

Expand Down

0 comments on commit b943b22

Please sign in to comment.