diff --git a/module2/exo1/toy_document_orgmode_R_fr b/module2/exo1/toy_document_orgmode_R_fr index 9a01677cf163c5f59ed59c3fef232386d1e9919c..b4f6f824857ac9bdf67088a3fdd26faa5745a1cc 100644 --- a/module2/exo1/toy_document_orgmode_R_fr +++ b/module2/exo1/toy_document_orgmode_R_fr @@ -11,7 +11,8 @@ knitr::opts_chunk$set(echo = TRUE) Mon ordinateur m'indique que $\pi$ vaut *approximativement* ```{r cars} -pi +pi +*3.141592653589793* ``` @@ -24,6 +25,7 @@ N = 100000 x = runif(N) theta = pi/2*runif(N) 2/(mean(x+sin(theta)>1)) +_3.12891113892_ ``` # Avec un argument “fréquentiel” de surface @@ -47,4 +49,5 @@ Il est alors aisé d’obtenir une approximation (pas terrible) de $\pi$ en comp ```{r } 4*mean(df$Accept) +3.1120000000000001 ```