Skip to content

M
mooc-rr
Commit 30be81b8 authored by cc04d6c622240218f9bdfa852287cc7d's avatar cc04d6c622240218f9bdfa852287cc7d
Browse files
Options

graph typo 

how to evaluate code on Gitlab?
parent d83ae494
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 2 deletions
module2/exo1/toy_document_orgmode_R_fr.org
View file @ 30be81b8
...@@ -13,7 +13,7 @@ ...@@ -13,7 +13,7 @@
Mon ordinateur m’indique que $\pi$ vaut /approximativement/ Mon ordinateur m’indique que $\pi$ vaut /approximativement/
#+begin_src R :results output :exports both #+begin_src R :results output :session *R* :exports both
pi pi
#+end_src #+end_src
...@@ -40,7 +40,7 @@ suivant illustre ce fait : ...@@ -40,7 +40,7 @@ suivant illustre ce fait :
set.seed(42) set.seed(42)
N = 1000 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 <=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()
#+end_src #+end_src
......
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