Skip to content

M
moocrr-reproducibility-study
Commit 15073bd4 authored by cb6d79e533b238280db7ee6b4d90ef19's avatar cb6d79e533b238280db7ee6b4d90ef19
Browse files
Options

Update toy_document_en.Rmd

parent 9716c292
Hide whitespace changes
Inline Side-by-side
Showing with 6 additions and 4 deletions
module2/exo1/toy_document_en.Rmd
View file @ 15073bd4
--- ---
title: "How" title: "On the computation of pi"
Author: Meiling WU Author: Da Nguyen
Date: 30.05.2022 Date: 28.06.2026
output: html_document: output: html_document:
--- ---
...@@ -28,4 +28,6 @@ N = 1000 ...@@ -28,4 +28,6 @@ N = 1000
df = data.frame(X = runif(N), Y = runif(N)) df = data.frame(X = runif(N), Y = runif(N))
df$Accept = (df$X**2 + df$Y**2 <=1) df$Accept = (df$X**2 + df$Y**2 <=1)
library(ggplot2) library(ggplot2)
ggplot(df, aes(x=X,y=Y,color=Accept)) + geom_point(alpha=.2) + coord_fixed() + theme_bw() ggplot(df, aes(x=X,y=Y,color=Accept)) + geom_point(alpha=.2) + coord_fixed() + theme_bw()
\ No newline at end of file
*mean(df$Accept)
\ No newline at end of file
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