diff --git a/module2/exo1/toy_document_fr.Rmd b/module2/exo1/toy_document_fr.Rmd index 61c34754ed48bf4f920316d57fe4b4f455eee1aa..90ada908a395b8fc877658f32735eaf2484eed20 100644 --- a/module2/exo1/toy_document_fr.Rmd +++ b/module2/exo1/toy_document_fr.Rmd @@ -24,7 +24,7 @@ Mais calculé avec la **méthode** des [aiguilles de Buffon] (https://fr.wikiped ```{r} set.seed(42) N = 100000 -x = ruinif(N) +x = runif(N) theta = pi/2*runif(N) 2/(mean(x+sin(theta)>1)) ``` @@ -38,7 +38,7 @@ df$Accept = (df$X**2 + df$Y**2 <=1) 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 $\pi$ en comptant combien de fois, en moyenne, nne, $X^2 + Y^2$ est inférieur à 1 : +Il est alors aisé d'obtenir une approximation (pas terrible) de $\pi$ en comptant combien de fois, en moyennne, $X^2 + Y^2$ est inférieur à 1 : ```{r} 4*mean(df$Accept) ``` \ No newline at end of file