From d32a09b2fa559f3f11128ea6bd0db531d95bc747 Mon Sep 17 00:00:00 2001 From: 8304325c6c80c4a3e512ad9acf6efc06 <8304325c6c80c4a3e512ad9acf6efc06@app-learninglab.inria.fr> Date: Wed, 7 May 2025 15:45:25 +0000 Subject: [PATCH] Delete Rstudio --- Rstudio | 27 --------------------------- 1 file changed, 27 deletions(-) delete mode 100644 Rstudio diff --git a/Rstudio b/Rstudio deleted file mode 100644 index 50ba6d9..0000000 --- a/Rstudio +++ /dev/null @@ -1,27 +0,0 @@ -title: "Estimations de π avec R" -author: "Votre nom" -date: "`r format(Sys.Date(), '%d %B %Y')`" -output: html_document ---- - -```{r setup, include=FALSE} -knitr::opts_chunk$set(echo = TRUE, message = FALSE, warning = FALSE) -library(ggplot2) -piset.seed(42) -N <- 100000 -x <- runif(N) -theta <- pi / 2 * runif(N) -pi_buffon <- 2 / mean(x + sin(theta) > 1) -pi_buffon -set.seed(42) -N <- 1000 -df <- data.frame(X = runif(N), Y = runif(N)) -df$Accept <- (df$X^2 + df$Y^2 <= 1) -ggplot(df, aes(x = X, y = Y, color = Accept)) + - geom_point(alpha = 0.2) + - coord_fixed() + - theme_bw() - - ---- - -- 2.18.1