Update toy_document_fr.Rmd

9e9a1232 · 3a0afacf91c0cf56b72bd72775670cb7 · 1cb58b8d · 9e9a1232
Commit 9e9a1232 authored Feb 10, 2022 by 3a0afacf91c0cf56b72bd72775670cb7
Show whitespace changes
Inline Side-by-side

Showing with 9 additions and 0 deletions

toy_document_fr.Rmd module2/exo1/toy_document_fr.Rmd +9 -0

No files found.
--- a/module2/exo1/toy_document_fr.Rmd
+++ b/module2/exo1/toy_document_fr.Rmd
@@ -19,3 +19,12 @@ print(p)
 #Lien aiguille de buffon

 [Aiguille de Buffon](https://fr.wikipedia.org/wiki/Aiguille_de_Buffon)
+
+```{r}	
+set.seed(42)	
+N = 100000	
+x = runif(N)	
+theta = pi/2*runif(N)	
+R=2/(mean(x+sin(theta)>1))
+plot=R
+```