Skip to content

Commit f0b1fab

Browse files
minor changes in 02a
1 parent 4718213 commit f0b1fab

21 files changed

+77
-79
lines changed

DESCRIPTION

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -18,5 +18,5 @@ LazyData: true
1818
URL: https://github.com/BioDataScience-Course/BioDataScience
1919
BugReports: https://github.com/BioDataScience-Course/BioDataScience/issues
2020
Roxygen: list(markdown = TRUE)
21-
RoxygenNote: 6.0.1
21+
RoxygenNote: 6.1.0
2222
VignetteBuilder: knitr

inst/tutorials/02a_r_decouverte/02a_r_decouverte.Rmd

Lines changed: 3 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -8,21 +8,18 @@ output:
88
allow_skip: true
99
fig_caption: yes
1010
tutorial:
11-
version: 0.11111111111111
11+
version: 0.12
1212
runtime: shiny_prerendered
1313
---
1414

15+
![](images/intro.png)
16+
1517
```{r setup, include=FALSE}
1618
library(learnr)
1719
knitr::opts_chunk$set(echo = FALSE)
1820
library(knitr)
1921
SciViews::R
20-
library(tibble)
21-
library(tidyverse)
2222
library(BioDataScience)
23-
library(chart)
24-
library(data)
25-
library(flow)
2623
library(skimr)
2724
```
2825

inst/tutorials/02a_r_decouverte/02a_r_decouverte.html

Lines changed: 5 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -45,6 +45,10 @@
4545

4646
<div class="topics">
4747

48+
<div class="figure">
49+
<img src="images/intro.png" />
50+
51+
</div>
4852
<div id="section-objectif" class="section level2">
4953
<h2>Objectif</h2>
5054
<p>Ce tutoriel a pour objectif de vous permettre de :</p>
@@ -743,17 +747,12 @@ <h2>Conclusion</h2>
743747
knitr::opts_chunk$set(echo = FALSE)
744748
library(knitr)
745749
SciViews::R
746-
library(tibble)
747-
library(tidyverse)
748750
library(BioDataScience)
749-
library(chart)
750-
library(data)
751-
library(flow)
752751
library(skimr)
753752
</script>
754753

755754
<script type="application/shiny-prerendered" data-context="server">
756-
learnr:::register_http_handlers(session, metadata = list(version = 0.11111111111111))
755+
learnr:::register_http_handlers(session, metadata = list(version = 0.12))
757756
</script>
758757

759758
<script type="application/shiny-prerendered" data-context="server">
24.3 KB
Loading
Lines changed: 13 additions & 21 deletions
Original file line numberDiff line numberDiff line change
@@ -34,15 +34,14 @@ chart(urchin, formula = skeleton ~ weight) +
3434
```
3535

3636

37-
**Il est important de préciser que l'ensemble de vos résultats est collecté afin de suivre votre progression. Ce test n'est cependant pas certificatif.**
37+
Il est important de préciser que l'ensemble de vos résultats est collecté afin de suivre votre progression. Ce test n'est cependant pas certificatif.
3838

3939
## Introduction
4040

4141
Le nuage de points permet de représenter une variable numérique en fonction d'une autre variable numérique. On peut exprimer cette relation dans R sous la forme de $$y \sim x$$ que l'on peut lire : $$y \ en \ fonction \ de \ x$$
4242

4343

4444
```{r, echo=FALSE, results= 'hide', message=FALSE, fig.cap= "Points essentiels d'un nuage de points"}
45-
4645
chart(urchin,formula = height ~ weight) +
4746
geom_point() +
4847
labs( x = "Label de l'axe x + [Unité]",
@@ -107,23 +106,7 @@ Le jeu de données assigné à `urchin` contient des valeurs manquantes comme le
107106

108107
**Warning message: Removed 163 rows containing missing values (geom_point).**
109108

110-
Faites appel à la fonction d'aide de la fonction geom_point afin de trouver une solution. Rapellez vous qu'il suffit d'employer le point d'interrogation `?` devant la fonction d'intérêt.
111-
112-
```{r appel_aide, exercise=TRUE}
113-
114-
```
115-
116-
```{r appel_aide-solution}
117-
?geom_point()
118-
```
119-
120-
121-
```{r na_graph_intro}
122-
chart(urchin, formula = skeleton ~ weight) +
123-
geom_point(na.rm = TRUE)
124-
```
125-
126-
Réalisez un nuage de points montrant le masse du squelette en ordonnée et le masse totale en abscisse. Précisez qu'il y a des valeurs manquantes.
109+
Ajoutez l'argument `na.rm = TRUE` dans la fonction `geom_point()` afin de préciser que les variables du jeu de données contiennent des valeurs manquantes. Réalisez un nuage de points montrant le masse du squelette en ordonnée et le masse totale en abscisse. Précisez qu'il y a des valeurs manquantes.
127110

128111
```{r na_graph, exercise=TRUE}
129112
chart(DF, formula = YNUM ~ XNUM) +
@@ -165,7 +148,7 @@ Maintenant que vous avez rapidement réalisé les graphiques vus durant la vidé
165148

166149
### Exercice 1
167150

168-
La couleur n'est pas forcément l'argument le plus judicieux à employer pour différencier une variable facteur au sein d'un nuage de points. Il vous sera parfois demandé d'employer des formes (`%shape=%`) ou encore des nuances de gris différentes (`%alpha=%`) que vous devez ajouter à la formule de la fonction `chart()`.
151+
La couleur n'est pas forcément l'argument le plus judicieux à employer pour différencier une variable facteur au sein d'un nuage de points. Il vous sera parfois demandé d'employer des formes (`%shape=%`) ou encore l'opacité (`%alpha=%`) que vous devez ajouter à la formule de la fonction `chart()`.
169152

170153
```{r alpha_graph_intro}
171154
a <- chart(urchin, formula = lantern ~ test %alpha=% origin) +
@@ -356,4 +339,13 @@ chart(urchin, formula = skeleton ~ weight %col=% origin) +
356339

357340
## Conclusion
358341

359-
Bravo! Vous venez de terminez votre séance d'exercice dans un learnr.
342+
Bravo! Vous venez de terminez votre séance d'exercice dans un learnr. Ce dernier vous a proposé d'apprendre à employer le graphique de type nuage de point.
343+
344+
345+
346+
Laissez nous vos impressions sur cet outil pédagogique. Afin de placer un commentaire dans une zone de réponse utilisez la dièse (`#`) devant vos phrases.
347+
348+
```{r comm, exercise = TRUE}
349+
# ajout de commentaires
350+
#
351+
```
Lines changed: 28 additions & 29 deletions
Original file line numberDiff line numberDiff line change
@@ -49,18 +49,18 @@
4949
<h2>Objectifs</h2>
5050
<p>Ce tutoriel interactif a pour objectif d’apprendre à réaliser des graphiques de type nuage de points comme montré sur la figure ci-dessous.</p>
5151
<div class="figure">
52-
<img src="module02b_nuage_de_points_files/figure-html/unnamed-chunk-1-1.png" alt="Variation de la masse du squelette en fonction de la masse totale de *Paracentrotus lividus* Lamarck 1816" width="624" />
52+
<img src="02b_nuage_points_files/figure-html/unnamed-chunk-1-1.png" alt="Variation de la masse du squelette en fonction de la masse totale de *Paracentrotus lividus* Lamarck 1816" width="624" />
5353
<p class="caption">
5454
Variation de la masse du squelette en fonction de la masse totale de <em>Paracentrotus lividus</em> Lamarck 1816
5555
</p>
5656
</div>
57-
<p><strong>Il est important de préciser que l’ensemble de vos résultats est collecté afin de suivre votre progression. Ce test n’est cependant pas certificatif.</strong></p>
57+
<p>Il est important de préciser que l’ensemble de vos résultats est collecté afin de suivre votre progression. Ce test n’est cependant pas certificatif.</p>
5858
</div>
5959
<div id="section-introduction" class="section level2">
6060
<h2>Introduction</h2>
6161
<p>Le nuage de points permet de représenter une variable numérique en fonction d’une autre variable numérique. On peut exprimer cette relation dans R sous la forme de <span class="math display">\[y \sim x\]</span> que l’on peut lire : <span class="math display">\[y \ en \ fonction \ de \ x\]</span></p>
6262
<div class="figure">
63-
<img src="module02b_nuage_de_points_files/figure-html/unnamed-chunk-2-1.png" alt="Points essentiels d'un nuage de points" width="624" />
63+
<img src="02b_nuage_points_files/figure-html/unnamed-chunk-2-1.png" alt="Points essentiels d'un nuage de points" width="624" />
6464
<p class="caption">
6565
Points essentiels d’un nuage de points
6666
</p>
@@ -82,7 +82,7 @@ <h2>Retour sur la vidéo</h2>
8282
<h3>Exercice 1</h3>
8383
<p>Le jeu de données <code>urchin_bio</code> portant sur la biométrie d’oursins est assigné à <code>urchin</code>. Les variables employées pour ce premier graphique sont la masse du squelette (<code>skeleton</code>) et le masse totale (<code>weight</code>).</p>
8484
<pre><code>## Warning: Removed 163 rows containing missing values (geom_point).</code></pre>
85-
<p><img src="module02b_nuage_de_points_files/figure-html/first_graph_intro-1.png" width="624" /></p>
85+
<p><img src="02b_nuage_points_files/figure-html/first_graph_intro-1.png" width="624" /></p>
8686
<p>Réalisez un nuage de points montrant la masse du squelette en ordonnée et la masse totale en abscisse afin d’obtenir le graphique ci-dessus.</p>
8787
<div class="tutorial-exercise" data-label="first_graph" data-caption="Code" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
8888
<pre class="text"><code>chart(DF, formula = YNUM ~ XNUM) +
@@ -101,15 +101,7 @@ <h3>Exercice 1</h3>
101101
<h4>Exercice 2</h4>
102102
<p>Le jeu de données assigné à <code>urchin</code> contient des valeurs manquantes comme le précise le message suivant lors de la réalisation du graphique précédent.</p>
103103
<p><strong>Warning message: Removed 163 rows containing missing values (geom_point).</strong></p>
104-
<p>Faites appel à la fonction d’aide de la fonction geom_point afin de trouver une solution. Rapellez vous qu’il suffit d’employer le point d’interrogation <code>?</code> devant la fonction d’intérêt.</p>
105-
<div class="tutorial-exercise" data-label="appel_aide" data-caption="Code" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
106-
<script type="application/json" data-opts-chunk="1">{"fig.width":6.5,"fig.height":4,"fig.retina":2,"fig.align":"default","fig.keep":"high","fig.show":"asis","out.width":624,"warning":true,"error":false,"message":true,"exercise.df_print":"paged","exercise.checker":"NULL"}</script>
107-
</div>
108-
<div class="tutorial-exercise-support" data-label="appel_aide-solution" data-caption="Code" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
109-
<pre class="text"><code>?geom_point()</code></pre>
110-
</div>
111-
<p><img src="module02b_nuage_de_points_files/figure-html/na_graph_intro-1.png" width="624" /></p>
112-
<p>Réalisez un nuage de points montrant le masse du squelette en ordonnée et le masse totale en abscisse. Précisez qu’il y a des valeurs manquantes.</p>
104+
<p>Ajoutez l’argument <code>na.rm = TRUE</code> dans la fonction <code>geom_point()</code> afin de préciser que les variables du jeu de données contiennent des valeurs manquantes. Réalisez un nuage de points montrant le masse du squelette en ordonnée et le masse totale en abscisse. Précisez qu’il y a des valeurs manquantes.</p>
113105
<div class="tutorial-exercise" data-label="na_graph" data-caption="Code" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
114106
<pre class="text"><code>chart(DF, formula = YNUM ~ XNUM) +
115107
geom_point()</code></pre>
@@ -126,7 +118,7 @@ <h4>Exercice 2</h4>
126118
<div id="section-exercice-3" class="section level3">
127119
<h3>Exercice 3</h3>
128120
<p>Vous souhaitez visualiser la différence d’origine des oursins mesurés. Ces informations se situent dans la variable sur l’origine (<code>origin</code>). L’utilisation de la couleur peut permettre de différencier ces derniers. La formule de la fonction <code>chart()</code> peut être complétée avec l’argument faisant référence à la couleur (<code>%col=%</code>).</p>
129-
<p><img src="module02b_nuage_de_points_files/figure-html/col_graph_intro-1.png" width="624" /></p>
121+
<p><img src="02b_nuage_points_files/figure-html/col_graph_intro-1.png" width="624" /></p>
130122
<p>Réalisez un nuage de points montrant la masse du squelette en ordonnée et la masse en abscisse. Utilisez la couleur afin de différencier l’origine des individus et précisez à nouveau qu’il y a des valeurs manquantes.</p>
131123
<div class="tutorial-exercise" data-label="col_graph" data-caption="Code" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
132124
<pre class="text"><code>chart(DF, formula = YNUM ~ XNUM %col=% FACTOR) +
@@ -144,9 +136,9 @@ <h2>Exercices sur le nuage de points</h2>
144136
<p>Maintenant que vous avez rapidement réalisé les graphiques vus durant la vidéo, expérimentez d’autres fonctions et arguments liés au nuage de points.</p>
145137
<div id="section-exercice-1-1" class="section level3">
146138
<h3>Exercice 1</h3>
147-
<p>La couleur n’est pas forcément l’argument le plus judicieux à employer pour différencier une variable facteur au sein d’un nuage de points. Il vous sera parfois demandé d’employer des formes (<code>%shape=%</code>) ou encore des nuances de gris différentes (<code>%alpha=%</code>) que vous devez ajouter à la formule de la fonction <code>chart()</code>.</p>
139+
<p>La couleur n’est pas forcément l’argument le plus judicieux à employer pour différencier une variable facteur au sein d’un nuage de points. Il vous sera parfois demandé d’employer des formes (<code>%shape=%</code>) ou encore l’opacité (<code>%alpha=%</code>) que vous devez ajouter à la formule de la fonction <code>chart()</code>.</p>
148140
<pre><code>## Warning: Using alpha for a discrete variable is not advised.</code></pre>
149-
<p><img src="module02b_nuage_de_points_files/figure-html/alpha_graph_intro-1.png" width="624" /></p>
141+
<p><img src="02b_nuage_points_files/figure-html/alpha_graph_intro-1.png" width="624" /></p>
150142
<p>Nous pouvons observer que l’utilisation de la forme n’est pas forcément l’argument le plus judicieux dans cet exemple.</p>
151143
<p>Intéressez-vous à la masse de la lanterne d’aristote (<code>lantern</code>) en fonction de la masse du test (<code>test</code>).</p>
152144
<p>Réalisez un nuage de points montrant le masse de la lanterne d’Aristote (<code>lantern</code>) en ordonnée et la masse du test (<code>test</code>) en abscisse. Utilisez les nuances de gris afin de différencier l’origine des individus. Précisez à nouveau qu’il y a des valeurs manquantes.</p>
@@ -168,7 +160,7 @@ <h3>Exercice 1</h3>
168160
<h3>Exercice 2</h3>
169161
<p>Intéressez-vous maintenant à la masse (<code>weight</code>) des individus en fonction de leur masse immergée (<code>buoyant_weight</code>).</p>
170162
<p>Vous pouvez avoir le souhait d’employer 2 variables facteurs pour obtenir un graphique plus informatif. La variable portant sur le sex des individus (<code>sex</code>) peut être employée.</p>
171-
<p><img src="module02b_nuage_de_points_files/figure-html/2factor_graph_intro-1.png" width="624" /></p>
163+
<p><img src="02b_nuage_points_files/figure-html/2factor_graph_intro-1.png" width="624" /></p>
172164
<p>Réalisez un nuage de points montrant la masse en ordonnée et la masse immergée en abscisse. Utilisez la couleur afin de différencier l’origine des individus et différentes formes afin de différencier le sex des individus. Précisez à nouveau qu’il y a des valeurs manquantes.</p>
173165
<p>Vous pouvez observer qu’une première ligne de code vous est fournies afin de retirer les lignes de tableau ne contenant pas l’information sur le sex des individus. Vous apprendrez dans les prochains cours à manipuler vos jeux de données.</p>
174166
<div class="tutorial-exercise" data-label="2factor_graph" data-caption="Code" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
@@ -194,7 +186,7 @@ <h3>Exercice 2</h3>
194186
<div id="section-exercice-3-1" class="section level3">
195187
<h3>Exercice 3</h3>
196188
<p>Intéressez-vous maintenant à la hauteur (<code>height</code>) en fonction de la masse (<code>weight</code>) des individus.</p>
197-
<p><img src="module02b_nuage_de_points_files/figure-html/unnamed-chunk-3-1.png" width="624" /></p>
189+
<p><img src="02b_nuage_points_files/figure-html/unnamed-chunk-3-1.png" width="624" /></p>
198190
<p>Réalisez un nuage de points montrant le logarithme de la masse en ordonnée et le logarithme de la masse immergée en abscisse. Utilisez la couleur afin de différencier l’origine des individus et précisez à nouveau qu’il y a des valeurs manquantes.</p>
199191
<div class="tutorial-exercise" data-label="log_log" data-caption="Code" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
200192
<pre class="text"><code>chart(DF, formula = YNUM ~ XNUM) +
@@ -219,7 +211,7 @@ <h3>Exercice 3</h3>
219211
<h2>Challenge</h2>
220212
<p>Cette partie du learnr requiert d’appliquer les concepts vus précédement mais d’y ajouter de nouvelles que vous devez appréhender par vous-même via entre autres la section <code>Pour en savoir plus...</code> du livre.</p>
221213
<p>Employez le graphique que vous avez déjà réalisé précédement.</p>
222-
<p><img src="module02b_nuage_de_points_files/figure-html/challenge1_intro-1.png" width="624" /></p>
214+
<p><img src="02b_nuage_points_files/figure-html/challenge1_intro-1.png" width="624" /></p>
223215
<p>Vous souhaitez changer le nom des axes pour rendre le graphique présentable en francais.</p>
224216
<p>Réalisez un nuage de points montrant la masse du squelette en ordonnée et la masse totale en abscisse et précisez qu’il y a des valeurs manquantes. De plus, changez le nom des variables <code>Weight of skeleton [g]</code> par <code>Masse du squelette [g]</code> et <code>Total weight [g]</code> par <code>Masse totale [g]</code>.</p>
225217
<div class="tutorial-exercise" data-label="challenge1" data-caption="Code" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
@@ -236,9 +228,9 @@ <h2>Challenge</h2>
236228
labs(x = &quot;Masse totale [g]&quot;, y = &quot;Masse du squelette [g]&quot;) </code></pre>
237229
</div>
238230
<p>Employez le graphique que vous avez déjà réalisé précédement utilisant la couleur comme variable facteur différenciant les oursins mesurés en élevage et en milieu naturel.</p>
239-
<p><img src="module02b_nuage_de_points_files/figure-html/unnamed-chunk-4-1.png" width="624" /></p>
231+
<p><img src="02b_nuage_points_files/figure-html/unnamed-chunk-4-1.png" width="624" /></p>
240232
<p>Vous souhaitez continuer la personalisation du graphique en changeant le nom des axes, le nom de la légende pour rendre le graphique présentable en francais.</p>
241-
<p><img src="module02b_nuage_de_points_files/figure-html/challenge2_intro-1.png" width="624" /></p>
233+
<p><img src="02b_nuage_points_files/figure-html/challenge2_intro-1.png" width="624" /></p>
242234
<p>Réalisez un nuage de point montrant la masse du squelette en ordonnée et la masse en abscisse et précisez qu’il y a des valeurs manquantes. De plus, * changez le nom des variables <code>Weight of skeleton [g]</code> par <code>Masse du squelette [g]</code> et <code>Total weight [g]</code> par <code>Masse totale [g]</code></p>
243235
<ul>
244236
<li><p>Changez le nom des légendes <code>Origin</code> par <code>Origine</code>, <code>Farm</code> par <code>Elevage</code> et <code>Fishery</code> par <code>Milieu naturel</code></p></li>
@@ -262,7 +254,14 @@ <h2>Challenge</h2>
262254
</div>
263255
<div id="section-conclusion" class="section level2">
264256
<h2>Conclusion</h2>
265-
Bravo! Vous venez de terminez votre séance d’exercice dans un learnr.
257+
<p>Bravo! Vous venez de terminez votre séance d’exercice dans un learnr. Ce dernier vous a proposé d’apprendre à employer le graphique de type nuage de point.</p>
258+
<p>Laissez nous vos impressions sur cet outil pédagogique. Afin de placer un commentaire dans une zone de réponse utilisez la dièse (<code>#</code>) devant vos phrases.</p>
259+
<div class="tutorial-exercise" data-label="comm" data-caption="Code" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
260+
<pre class="text"><code># ajout de commentaires
261+
# </code></pre>
262+
<script type="application/json" data-opts-chunk="1">{"fig.width":6.5,"fig.height":4,"fig.retina":2,"fig.align":"default","fig.keep":"high","fig.show":"asis","out.width":624,"warning":true,"error":false,"message":true,"exercise.df_print":"paged","exercise.checker":"NULL"}</script>
263+
</div>
264+
266265
<script type="application/shiny-prerendered" data-context="server-start">
267266
library(learnr)
268267
knitr::opts_chunk$set(echo = FALSE)
@@ -289,13 +288,6 @@ <h2>Conclusion</h2>
289288
})
290289
</script>
291290

292-
<script type="application/shiny-prerendered" data-context="server">
293-
`tutorial-exercise-appel_aide-result` <- learnr:::setup_exercise_handler(reactive(req(input$`tutorial-exercise-appel_aide-code-editor`)), session)
294-
output$`tutorial-exercise-appel_aide-output` <- renderUI({
295-
`tutorial-exercise-appel_aide-result`()
296-
})
297-
</script>
298-
299291
<script type="application/shiny-prerendered" data-context="server">
300292
`tutorial-exercise-na_graph-result` <- learnr:::setup_exercise_handler(reactive(req(input$`tutorial-exercise-na_graph-code-editor`)), session)
301293
output$`tutorial-exercise-na_graph-output` <- renderUI({
@@ -343,6 +335,13 @@ <h2>Conclusion</h2>
343335
output$`tutorial-exercise-challenge2-output` <- renderUI({
344336
`tutorial-exercise-challenge2-result`()
345337
})
338+
</script>
339+
340+
<script type="application/shiny-prerendered" data-context="server">
341+
`tutorial-exercise-comm-result` <- learnr:::setup_exercise_handler(reactive(req(input$`tutorial-exercise-comm-code-editor`)), session)
342+
output$`tutorial-exercise-comm-output` <- renderUI({
343+
`tutorial-exercise-comm-result`()
344+
})
346345
</script>
347346
<!--html_preserve-->
348347
<script type="application/shiny-prerendered" data-context="dependencies">
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.

0 commit comments

Comments
 (0)