diff --git a/module2/exo1/toy_document_fr.Rmd b/module2/exo1/toy_document_fr.Rmd index c09a30a7995041161a8497d099629e218f36b2ac..17f2ebf47681f0c83aa02f10c6c878a8f6c98bf5 100644 --- a/module2/exo1/toy_document_fr.Rmd +++ b/module2/exo1/toy_document_fr.Rmd @@ -6,10 +6,29 @@ output: html_document --- -```{r setup, include=FALSE} -knitr::opts_chunk$set(echo = TRUE) +# En demandant à la lib maths +Mon ordinateur m'indique que $\pi$ vaut *approximativement* + +```{r pi} +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** + +```{r aiguilles} +set.seed(42) +N = 100000 +x = runif(N) +theta = pi/2*runif(N) +2/(mean(x+sin(theta)>1)) ``` +# Avec un argument "fréquentiel" de surface +Sinon, avec une méthode plus sumple à comprendre et ne faisant pas intervenir d'appel à la fonction sinus se base sur le fait que si $XapproxU(0,1)$ alors + + + ## Quelques explications On fait des tests !!!!!!!!!!!!!!!!!!!!!!!