J'ai appris à écrire pi

parent 9f821b15
......@@ -10,7 +10,7 @@ knitr::opts_chunk$set(echo = TRUE)
```
# En demandant à la lib maths
Mon ordinateur m'indique que *π* vaut *approximativement*
Mon ordinateur m'indique que *$\pi$* vaut *approximativement*
```{r}
pi
```
......@@ -35,7 +35,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 *π* 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)
```
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment