graph typo

how to evaluate code on Gitlab?

module2/exo1/toy_document_orgmode_R_fr.org

@@ -13,7 +13,7 @@
 
 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
 #+end_src
 
@@ -40,7 +40,7 @@ suivant illustre ce fait :
 set.seed(42)
 N = 1000
 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)
 ggplot(df, aes(x=X,y=Y, color=Accept)) + geom_point(alpha=.2) + coord_fixed() + theme_bw()
 #+end_src