diff --git a/module2/exo1/toy_document_fr.Rmd b/module2/exo1/toy_document_fr.Rmd index 9dfade5e5784fd97b0bcf2e39a9cce59771b7661..8a327788ffb3e9d97bd6f84e4382c0f8b6fd8acf 100644 --- a/module2/exo1/toy_document_fr.Rmd +++ b/module2/exo1/toy_document_fr.Rmd @@ -1,12 +1,13 @@ -# **A propos du calcul de pi** - -*Arnaud Legrand* - -*25 juin 2018* +------ +title: "__A propos du calcul de pi__" +author: "_Arnaud Legrand_" +date: "_25 juin 2018_" +output: html_document +--- -## **En demandant à la lib maths** +## __En demandant à la lib maths__ -Mon ordinateur m’indique que *π* vaut *approximativement* +Mon ordinateur m’indique que _π_ vaut _approximativement_ ``` pi @@ -16,7 +17,7 @@ pi ## En utilisant la méthode des aiguilles de Buffon -Mais calculé avec la **méthode** des [aiguilles de Buffon] (https://fr.wikipedia.org/wiki/Aiguille_de_Buffon), on obtiendrait comme **approximation** : +Mais calculé avec la __méthode__ des [aiguilles de Buffon] (https://fr.wikipedia.org/wiki/Aiguille_de_Buffon), on obtiendrait comme __approximation__ : ``` set.seed(42) @@ -41,7 +42,7 @@ library(ggplot2) ggplot(df, aes(x=X,y=Y,color=Accept)) + geom_point(alpha=.2) + coord_fixed() + theme_bw() ``` -Il est alors aisé d’obtenir une approximation (pas terrible) de *π* en comptant combien de fois, en moyenne, X2+Y2 est inférieur à 1: +Il est alors aisé d’obtenir une approximation (pas terrible) de _π_ en comptant combien de fois, en moyenne, X2+Y2 est inférieur à 1: ``` 4*mean(df$Accept)