Skip to content

Commit 920d202

Browse files
Edition of 04_test
1 parent f9dbcdf commit 920d202

23 files changed

+1238
-29
lines changed

Untitled/Untitled.Rmd

Lines changed: 75 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,75 @@
1+
---
2+
title: "Tutorial"
3+
output: learnr::tutorial
4+
runtime: shiny_prerendered
5+
---
6+
7+
```{r setup, include=FALSE}
8+
library(learnr)
9+
knitr::opts_chunk$set(echo = FALSE)
10+
```
11+
12+
13+
## Topic 1
14+
15+
### Exercise
16+
17+
*Here's a simple exercise with an empty code chunk provided for entering the answer.*
18+
19+
Write the R code required to add two plus two:
20+
21+
```{r two-plus-two, exercise=TRUE}
22+
23+
```
24+
25+
### Exercise with Code
26+
27+
*Here's an exercise with some prepopulated code as well as `exercise.lines = 5` to provide a bit more initial room to work.*
28+
29+
Now write a function that adds any two numbers and then call it:
30+
31+
```{r add-function, exercise=TRUE, exercise.lines = 5}
32+
add <- function() {
33+
34+
}
35+
```
36+
37+
## Topic 2
38+
39+
### Exercise with Hint
40+
41+
*Here's an exercise where the chunk is pre-evaulated via the `exercise.eval` option (so the user can see the default output we'd like them to customize). We also add a "hint" to the correct solution via the chunk immediate below labeled `print-limit-hint`.*
42+
43+
Modify the following code to limit the number of rows printed to 5:
44+
45+
```{r print-limit, exercise=TRUE, exercise.eval=TRUE}
46+
mtcars
47+
```
48+
49+
```{r print-limit-hint}
50+
head(mtcars)
51+
```
52+
53+
### Quiz
54+
55+
*You can include any number of single or multiple choice questions as a quiz. Use the `question` function to define a question and the `quiz` function for grouping multiple questions together.*
56+
57+
Some questions to verify that you understand the purposes of various base and recommended R packages:
58+
59+
```{r quiz}
60+
quiz(
61+
question("Which package contains functions for installing other R packages?",
62+
answer("base"),
63+
answer("tools"),
64+
answer("utils", correct = TRUE),
65+
answer("codetools")
66+
),
67+
question("Which of the R packages listed below are used to create plots?",
68+
answer("lattice", correct = TRUE),
69+
answer("tools"),
70+
answer("stats"),
71+
answer("grid", correct = TRUE)
72+
)
73+
)
74+
```
75+

inst/translation/biometry_en.R

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -15,7 +15,7 @@
1515
weight = "kg",
1616
height = "cm",
1717
wrist = "mm",
18-
year_measure = NA,
18+
year_measure = "year",
1919
age = "year"),
2020
as_labelled = as_labelled)
2121

inst/translation/biometry_fr.R

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -15,7 +15,7 @@
1515
weight = "kg",
1616
height = "cm",
1717
wrist = "mm",
18-
year_measure = NA,
18+
year_measure = "année",
1919
age = "année"),
2020
as_labelled = as_labelled)
2121

inst/tutorials/02b_decouverte/decouverte.Rmd

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -722,7 +722,6 @@ chart(bio_100, ~ bmi %fill=% gender) +
722722
scale_fill_viridis_d()
723723
```
724724

725-
726725
Utilisez la fonction `chart()` pour représenter graphiquement la distribution des données par rapport au bmi des individus.
727726

728727
```{r histo, exercise = TRUE, exercise.setup = "prepare4"}

inst/tutorials/02b_decouverte/decouverte.html

Lines changed: 22 additions & 18 deletions
Large diffs are not rendered by default.
Binary file not shown.
Binary file not shown.
Binary file not shown.

inst/tutorials/03a_test/test.html

Lines changed: 8 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -100,7 +100,7 @@ <h3>Biométrie humaine</h3>
100100
</div>
101101
<p>Reproduisez le graphique suivant qui représente la distribution de l’age des individus sondés lors d’une étude portant sur l’obésité en Hainaut. Le genre de ces derniers est employé afin produire deux graphiques.</p>
102102
<p><strong>Nom du jeu de données et des variables importantes</strong></p>
103-
<pre><code>[1] &quot;gender&quot; &quot;biometry&quot; &quot;age&quot; </code></pre>
103+
<pre><code>[1] &quot;age&quot; &quot;gender&quot; &quot;biometry&quot;</code></pre>
104104
<p><img src="test_files/figure-html/unnamed-chunk-5-1.png" width="624" /></p>
105105
<div class="tutorial-exercise" data-label="graph2" data-caption="Code R" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
106106
<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.timelimit":60,"exercise.checker":["function (label, user_code, solution_code, check_code, envir_result, "," evaluate_result, ...) ","{"," list(message = \"Your answer is recorded!\", correct = TRUE, "," type = \"info\", location = \"append\")","}"]}</script>
@@ -110,7 +110,7 @@ <h3>Biométrie humaine</h3>
110110
</div>
111111
<p>Reproduisez le graphique suivant qui représente la répartition de la densité de la hauteur en fonction du genre des individus.</p>
112112
<p><strong>Nom du jeu de données et des variables importantes</strong></p>
113-
<pre><code>[1] &quot;biometry&quot; &quot;gender&quot; &quot;height&quot; </code></pre>
113+
<pre><code>[1] &quot;height&quot; &quot;gender&quot; &quot;biometry&quot;</code></pre>
114114
<p><img src="test_files/figure-html/unnamed-chunk-7-1.png" width="624" /></p>
115115
<div class="tutorial-exercise" data-label="graph3" data-caption="Code R" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
116116
<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.timelimit":60,"exercise.checker":["function (label, user_code, solution_code, check_code, envir_result, "," evaluate_result, ...) ","{"," list(message = \"Your answer is recorded!\", correct = TRUE, "," type = \"info\", location = \"append\")","}"]}</script>
@@ -120,7 +120,7 @@ <h3>Biométrie humaine</h3>
120120
</div>
121121
<p>Reproduisez le graphique suivant qui représente la répartition de la densité de la hauteur en fonction du genre des individus.</p>
122122
<p><strong>Nom du jeu de données et des variables importantes</strong></p>
123-
<pre><code>[1] &quot;height&quot; &quot;gender&quot; &quot;biometry&quot;</code></pre>
123+
<pre><code>[1] &quot;height&quot; &quot;biometry&quot; &quot;gender&quot; </code></pre>
124124
<p><img src="test_files/figure-html/unnamed-chunk-9-1.png" width="624" /></p>
125125
<div class="tutorial-exercise" data-label="graph4" data-caption="Code R" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
126126
<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.timelimit":60,"exercise.checker":["function (label, user_code, solution_code, check_code, envir_result, "," evaluate_result, ...) ","{"," list(message = \"Your answer is recorded!\", correct = TRUE, "," type = \"info\", location = \"append\")","}"]}</script>
@@ -148,7 +148,7 @@ <h3>Analyse d’image du zooplancton</h3>
148148
</div>
149149
<p>Reproduisez le graphique suivant qui représente la répartition de taille en fonction de la classe des copépodes.</p>
150150
<p><strong>Nom du jeu de données et des variables importantes</strong></p>
151-
<pre><code>[1] &quot;size&quot; &quot;class&quot; &quot;copepoda&quot;</code></pre>
151+
<pre><code>[1] &quot;class&quot; &quot;copepoda&quot; &quot;size&quot; </code></pre>
152152
<p><img src="test_files/figure-html/unnamed-chunk-12-1.png" width="624" /></p>
153153
<div class="tutorial-exercise" data-label="graph5" data-caption="Code R" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
154154
<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.timelimit":60,"exercise.checker":["function (label, user_code, solution_code, check_code, envir_result, "," evaluate_result, ...) ","{"," list(message = \"Your answer is recorded!\", correct = TRUE, "," type = \"info\", location = \"append\")","}"]}</script>
@@ -158,7 +158,7 @@ <h3>Analyse d’image du zooplancton</h3>
158158
</div>
159159
<p>Reproduisez le graphique suivant qui représente la répartition de taille en fonction de la classe des copépodes.</p>
160160
<p><strong>Nom du jeu de données et des variables importantes</strong></p>
161-
<pre><code>[1] &quot;size&quot; &quot;copepoda&quot; &quot;class&quot; </code></pre>
161+
<pre><code>[1] &quot;copepoda&quot; &quot;class&quot; &quot;size&quot; </code></pre>
162162
<pre><code>Picking joint bandwidth of 0.0583</code></pre>
163163
<p><img src="test_files/figure-html/unnamed-chunk-14-1.png" width="624" /></p>
164164
<div class="tutorial-exercise" data-label="graph6" data-caption="Code R" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
@@ -170,7 +170,7 @@ <h3>Analyse d’image du zooplancton</h3>
170170
</div>
171171
<p>Reproduisez le graphique suivant qui représente la répartition de taille en fonction de la classe du zooplancton.</p>
172172
<p><strong>Nom du jeu de données et des variables importantes</strong></p>
173-
<pre><code>[1] &quot;zooplankton&quot; &quot;class&quot; &quot;size&quot; </code></pre>
173+
<pre><code>[1] &quot;class&quot; &quot;zooplankton&quot; &quot;size&quot; </code></pre>
174174
<pre><code>Picking joint bandwidth of 0.112</code></pre>
175175
<p><img src="test_files/figure-html/unnamed-chunk-16-1.png" width="624" /></p>
176176
<div class="tutorial-exercise" data-label="graph7" data-caption="Code R" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
@@ -193,7 +193,7 @@ <h3>Biométrie d’oursins</h3>
193193
</div>
194194
<p>Reproduisez le graphique suivant qui représente la variation de la taille en fonction de la masse des oursins. L’orgine de ces derniers est mis en évidence par la couleur.</p>
195195
<p><strong>Nom du jeu de données et des variables importantes</strong></p>
196-
<pre><code>[1] &quot;weight&quot; &quot;origin&quot; &quot;height&quot; &quot;urchin&quot;</code></pre>
196+
<pre><code>[1] &quot;height&quot; &quot;weight&quot; &quot;origin&quot; &quot;urchin&quot;</code></pre>
197197
<p><img src="test_files/figure-html/unnamed-chunk-19-1.png" width="624" /></p>
198198
<div class="tutorial-exercise" data-label="graph1" data-caption="Code R" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
199199
<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.timelimit":60,"exercise.checker":["function (label, user_code, solution_code, check_code, envir_result, "," evaluate_result, ...) ","{"," list(message = \"Your answer is recorded!\", correct = TRUE, "," type = \"info\", location = \"append\")","}"]}</script>
@@ -203,7 +203,7 @@ <h3>Biométrie d’oursins</h3>
203203
</div>
204204
<p>Reproduisez le graphique suivant qui représente la variation de la taille en fonction de la masse des oursins. L’orgine et le sex de ces derniers sont mis en évidence par la couleur et la forme.</p>
205205
<p><strong>Nom du jeu de données et des variables importantes</strong></p>
206-
<pre><code>[1] &quot;origin&quot; &quot;height&quot; &quot;weight&quot; &quot;sex&quot; &quot;urchin&quot;</code></pre>
206+
<pre><code>[1] &quot;weight&quot; &quot;sex&quot; &quot;origin&quot; &quot;height&quot; &quot;urchin&quot;</code></pre>
207207
<pre><code>Warning: Removed 232 rows containing missing values (geom_point).</code></pre>
208208
<p><img src="test_files/figure-html/unnamed-chunk-21-1.png" width="624" /></p>
209209
<div class="tutorial-exercise" data-label="graph8" data-caption="Code R" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0">
8.68 KB
Loading

0 commit comments

Comments
 (0)