diff --git a/module2/exo1/toy_document_fr.Rmd b/module2/exo1/toy_document_fr.Rmd index b0ac33cc9729a2814ab8f0f8d5f6241d078694df..164463024979c5b2a27fa622ab2d1120da1add81 100644 --- a/module2/exo1/toy_document_fr.Rmd +++ b/module2/exo1/toy_document_fr.Rmd @@ -2,10 +2,12 @@ title: "A propos du calcul de pi" author: "Margot Thirion" date: "23 juin 2020" -output: html_document +output: + html_document: default + pdf_document: default --- -```{r setup, include = FALSE} -knitr::opts_chunk$set(echo = TRUE) +```{r setup, include=FALSE} +knitr::opts_chunk$set(echo=TRUE) ``` ## En demandant à la lib maths @@ -22,7 +24,7 @@ Mais calculé avec la **méthode** des [aiguilles de Buffon](https://fr.wikipedi set.seed(42) N = 100000 x = runif(N) -theta .= pi/2*runif(N) +theta = pi/2*runif(N) 2/(mean(x+sin(theta)>1)) ``` @@ -38,7 +40,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 pi en comptant combien de fois, en moyenne, $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 moyenne, $X^2 + Y^2$ est inférieur à 1: ```{r} 4*mean(df$Accept)