From 16bd3b10748eadc476b2630c41314b4d0b1bd77b Mon Sep 17 00:00:00 2001 From: 8304325c6c80c4a3e512ad9acf6efc06 <8304325c6c80c4a3e512ad9acf6efc06@app-learninglab.inria.fr> Date: Wed, 7 May 2025 15:38:59 +0000 Subject: [PATCH] Delete Rstudio --- Rstudio | 26 -------------------------- 1 file changed, 26 deletions(-) delete mode 100644 Rstudio diff --git a/Rstudio b/Rstudio deleted file mode 100644 index 717cd6c..0000000 --- a/Rstudio +++ /dev/null @@ -1,26 +0,0 @@ ---- -title: \"Votre titre\" -author: \"Votre nom\" -date: \"`r Sys.Date()`\" -output: html_document ---- - -```{r setup, include=FALSE} -knitr::opts_chunk$set(echo = TRUE)pi -set.seed(42) -N = 100000 -x = runif(N) -theta = pi / 2 * runif(N) -2 / (mean(x + sin(theta) > 1)) -set.seed(42) -N = 1000 -df = data.frame(X = runif(N), Y = runif(N)) -df$Accept = (df$X^2 + df$Y^2 <= 1) -library(ggplot2) -ggplot(df, aes(x = X, y = Y, color = Accept)) + - geom_point(alpha = 0.2) + - coord_fixed() + - theme_bw() -4 * mean(df$Accept) - -Tu peux maintenant copier ce bloc et l’utiliser directement dans RStudio. -- 2.18.1