From 2e78763518b29bb5bf8a2fcd12a172bbbd2a8aa4 Mon Sep 17 00:00:00 2001 From: ed435f6a909b1fd3609dea7d18b29ad4 Date: Fri, 25 Jul 2025 14:08:48 +0000 Subject: [PATCH] Update toy_document_fr.Rmd 5 --- module2/exo1/toy_document_fr.Rmd | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/module2/exo1/toy_document_fr.Rmd b/module2/exo1/toy_document_fr.Rmd index 61c3475..90ada90 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 -- 2.18.1