--- title: "A propos du calcul de pi" author: "Pasquier Laura" date: "10/02/2023" output: html_document --- # En demandant à la lib maths Mon ordinateur m'indique que π vaut approximativement ``` pi ``` ``` ## [1] 3.141593 ``` # 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 setup, include=FALSE} knitr::opts_chunk$set(echo = TRUE) ``` ``` set.seed(42) N = 100000 x = runif(N) theta = pi/2*runif(N) 2/(mean(x+sin(theta)>1)) ``` ``` ## [1] 3.14327 ``` Et on peut aussi aisément inclure des figures. Par exemple: ```{r pressure, echo=FALSE} plot(pressure) ```