diff --git a/session_1/img/ModernDive.png b/session_1/img/ModernDive.png
new file mode 100644
index 0000000000000000000000000000000000000000..e64686fc727ab50f9ff683efa3dfe7760e9650a2
Binary files /dev/null and b/session_1/img/ModernDive.png differ
diff --git a/session_1/img/RStudio.png b/session_1/img/RStudio.png
index fac8d641a9b8a2764b0a4ed640a093fe53e46bea..e1d286545c7084f9d4cfaab62cd048e08ce8c348 100644
Binary files a/session_1/img/RStudio.png and b/session_1/img/RStudio.png differ
diff --git a/session_1/HTML_tuto.Rmd b/session_1/session_1.Rmd
similarity index 100%
rename from session_1/HTML_tuto.Rmd
rename to session_1/session_1.Rmd
diff --git a/session_1/slides.Rmd b/session_1/slides.Rmd
deleted file mode 100644
index ea75ec293ffd5fb074fb9ea15fb9440af5f636a6..0000000000000000000000000000000000000000
--- a/session_1/slides.Rmd
+++ /dev/null
@@ -1,556 +0,0 @@
----
-title: 'R#1: Introduction to R and RStudio'
-author: "Laurent Modolo [laurent.modolo@ens-lyon.fr](mailto:laurent.modolo@ens-lyon.fr)"
-date: "10 Oct 2019"
-output:
-  beamer_presentation:
-    df_print: tibble
-    fig_caption: no
-    highlight: tango
-    latex_engine: xelatex
-    slide_level: 3
-    theme: metropolis
-  ioslides_presentation:
-    highlight: tango
-  slidy_presentation:
-    highlight: tango
----
-## R#1: Introduction to R and RStudio
-The goal of this practical is to familiarize yourself with R and the RStudio
-environment.
-
-The objectives of this session will be to:
-
-- Understand the purpose of each pane in RStudio
-- Do basic computation with R
-- Define variables and assign data to variables
-- Manage a workspace in R
-- Call functions
-- Manage packages
-
-## Acknowledgments
-
-\begin{columns}
-  \begin{column}{0.5\textwidth}
-    \includegraphics[width=\textwidth]{img/software_carpentry_logo}
-    {\bf https://software-carpentry.org/}
-    http://swcarpentry.github.io/r-novice-gapminder/
-  \end{column}
-  \begin{column}{0.5\textwidth}
-    \includegraphics[width=\textwidth]{img/r_for_data_science.png}
-  \end{column}
-\end{columns}
-
-# Some R background
-
-\includegraphics[width=40pt]{img/Rlogo.png}
-is a programming language and free software environment for statistical
-computing and graphics supported by the *R Foundation for Statistical Computing*.
-
-# Some R background
-
-\includegraphics[width=40pt]{img/Rlogo.png}
-
-- Created by **Ross Ihaka** and **Robert Gentleman**
-- initial version released in 1995
-- free and open-source implementation the S programming language
-- currently developed by the **R Development Core Team**.
-
-# Some R background
-
-Reasons to use \includegraphics[width=40pt]{img/Rlogo.png}
-
-- It’s free, well documented, and runs almost everywhere
-- it has a large (and growing) user base among scientists
-- it has a large library of external packages available for performing diverse tasks. 
-
-- **15,068** available packages on https://cran.r-project.org/
-- **3,087** available packages on http://www.bioconductor.org
-- **122,720** available repository on https://github.com/
-
-# Some R background
-
-\includegraphics[width=\textwidth]{img/R_terminal.png}
-
-# RStudio, the R IDE
-
-\begin{block}{IDR: Integrated development environment}
-application that provides {\bf comprehensive facilities} to computer programmers for
-software development
-\end{block}
-
-- free
-- open source
-
-## An interface
-
-\includegraphics[width=\textwidth]{img/RStudio.png}
-
-## The same console as before
-
-\includegraphics[width=\textwidth]{img/RStudio_console.png}
-
-# R as a calculator
-
-- Add: `+`
-- Divide: `/`
-- Multiply: `*`
-- Subtract: `-`
-- Exponents: `^` or `**`
-- Parentheses: `(`, `)`
-
-# R as a calculator
-
-```R
-1 + 100
-1 +
-```
-
-\pause
-
-```R
-3 + 5 * 2
-```
-
-```R
-(3 + 5) * 2
-```
-
-\pause
-
-```R
-(3 + (5 * (2 ^ 2))) # hard to read
-3 + 5 * 2 ^ 2       # clear, if you remember the rules
-3 + 5 * (2 ^ 2)     # if you forget some rules, this might help
-```
-
-\pause
-
-```R
-2/10000
-```
-
-\pause
-
-`2e-4` is shorthand for `2 * 10^(-4)`
-
-```R
-5e3
-```
-
-## Mathematical functions
-
-```R
-log(1)  # natural logarithm
-```
-
-\pause
-
-```R
-log10(10) # base-10 logarithm
-```
-
-\pause
-
-```R
-exp(0.5)
-```
-
-\pause
-
-Compute the factorial of `9`
-
-\pause
-
-```R
-factorial(9)
-```
-
-## Comparing things
-
-equality (note two equal signs read as "is equal to")
-```R
-1 == 1
-```
-\pause
-
-inequality (read as "is not equal to")
-```R
-1 != 2 
-```
-\pause
-
-less than
-```R
-1 < 2
-```
-\pause
-
-less than or equal to
-```R
-1 <= 1
-```
-\pause
-
-greater than
-```R
-1 > 0
-```
-
-## Variables and assignment
-
-`<-` is the assignment operator in R. (read as left member take right member value)
-
-```R
-x <- 1/40
-```
-
-```R
-x
-```
-
-## The environment
-
-\includegraphics[width=\textwidth]{img/RStudio_environment.png}
-
-## Variables and assignment
-
-```R
-log(x)
-x <- 100
-log(x)
-```
-\pause
-
-```R
-x <- x + 1
-y <- x * 2
-```
-
-\pause
-
-```R
-z <- "x"
-x + z
-```
-
-## Variables and assignment
-
-Variable names can contain letters, numbers, underscores and periods.
-
-They cannot start with a number nor contain spaces at all.
-
-Different people use different conventions for long variable names, these include
-
-```R
-periods.between.words
-underscores_between_words
-camelCaseToSeparateWords
-```
-
-What you use is up to you, but be consistent.
-
-\pause
-It is also possible to use the `=` operator for assignment but **don’t do it !**
-
-## Variables and assignment
-
-Which of the following are valid R variable names?
-
-```
-min_height
-max.height
-_age
-.mass
-MaxLength
-min-length
-2widths
-celsius2kelvin
-```
-
-**http://perso.ens-lyon.fr/laurent.modolo/R/1_a**
-
-## Functions are also variables
-
-```R
-logarithm <- log
-```
-
-\pause
-
-A R function can have different arguments
-
-```R
-function (x, base = exp(1))
-```
-
-- `base` is a named argument  are read from left to right
-- named arguments breaks the reading order
-- named arguments make your code more readable
-
-\pause
-
-To know more about the `log` function we can read its manual.
-
-```R
-help(log)
-```
-
-\pause
-
-```R
-?log
-```
-
-## Various output
-
-\includegraphics[width=\textwidth]{img/RStudio_outputs.png}
-
-## Functions are also variables
-
-Test that your `logarithm` function can work in base 10
-
-\pause
-
-```R
-10^logarithm(12, base = 10)
-```
-
-## Functions are also variables
-
-We can also define our own function with
-```R
-function_name <- function(a, b){
-  result_1 <- operation1(a, b)
-  result_2 <- operation2(result_1, b)
-  return(result_2)
-}
-```
-
-\pause
-
-write a function to test the base of the logarithm function
-
-\pause
-
-```R
-base_test <- function(x, base){
-  log_result <- logarithm(x, base=base)
-  exp_result <- base^log_result
-  test_result <- x == exp_result
-  return(test_result)
-}
-```
-
-**http://perso.ens-lyon.fr/laurent.modolo/R/1_b**
-
-## Functions are also variables
-
-```R
-base_test <- function(x, base){
-  print(x)
-  log_result <- logarithm(x, base=base)
-  print(log_result)
-  exp_result <- base^log_result
-  print(exp_result)
-  print(x)
-  test_result <- x == exp_result
-  return(test_result)
-}
-```
-
-**http://perso.ens-lyon.fr/laurent.modolo/R/1_c**
-
-## Functions are also variables
-
-```R
-base_test <- function(x, base){
-  print(x)
-  log_result <- logarithm(x, base=base)
-  print(log_result)
-  exp_result <- base^log_result
-  print(exp_result)
-  print(x)
-  test_result <- isTRUE(all.equal(x, exp_result))
-  return(test_result)
-}
-```
-
-**http://perso.ens-lyon.fr/laurent.modolo/R/1_d**
-
-## Functions are also variables
-
-```R
-base_test <- function(x, base){
-  return(isTRUE(all.equal(x, base^logarithm(x, base=base))))
-}
-```
-
-**http://perso.ens-lyon.fr/laurent.modolo/R/1_e**
-
-## The environment
-
-\includegraphics[width=\textwidth]{img/RStudio_environment.png}
-
-## A code editor
-
-\includegraphics[width=\textwidth]{img/RStudio_editor.png}
-
-## A code editor
-
-RStudio offers you great flexibility in running code from within the editor window. There are buttons, menu choices, and keyboard shortcuts. To run the current line, you can
-
-- click on the Run button above the editor panel, or
-- select “Run Lines” from the “Code” menu, or
-- hit Ctrl+Return in Windows or Linux or Cmd+Return on OS X. To run a block of code, select it and then Run. 
-
-If you have modified a line of code within a block of code you have just run, there is no need to reselect the section and Run, you can use the next button along, Rerun the previous region. This will run the previous code block including the modifications you have made.
-
-## A code editor
-
-Copy your `logarithm` and `base_test` into a `tp_1.R` file
-
-\pause
-
-We can now clean your environment
-
-```R
-rm(x)
-```
-
-\pause
-
-```R
-?rm
-```
-
-\pause
-
-```R
-ls()
-```
-
-\pause
-
-```R
-rm(list = ls())
-```
-
-## Installing packages
-
-```R
-install.packages("tidyverse")
-```
-
-```R
-install.packages("ggplot2")
-```
-
-## Installing packages
-
-\includegraphics[width=\textwidth]{img/RStudio_outputs.png}
-
-## Loading packages
-
-```R
-sessionInfo()
-```
-
-\pause
-
-```R
-library(tidyverse)
-```
-
-\pause
-
-```R
-sessionInfo()
-```
-
-\pause
-
-```R
-unloadNamespace("tidyverse")
-```
-
-\pause
-
-```R
-sessionInfo()
-```
-
-# Complex variable type
-
-## Vector (aka list)
-
-```R
-c(1, 2, 3, 4, 5)
-```
-
-\pause
-
-```R
-1:5
-```
-
-\pause
-
-```R
-2^(1:5)
-```
-
-\pause
-
-```R
-x <- 1:5
-2^x
-```
-
-\pause
-
-```R
-log(x)
-logarithm(x)
-base_test(x, base = 10)
-```
-
-## Vector (aka list)
-
-```R
-typeof(x)
-```
-
-\pause
-
-```R
-typeof(x + 0.5)
-```
-
-\pause
-
-```R
-is.vector(x)
-```
-
-\pause
-
-```R
-y <- c(a = 1, b = 2, c = 3, d = 4, e = 5)
-typeof(y)
-is.vector(y)
-```
-
-\pause
-
-```R
-x == y
-```
-
-\pause
-
-```R
-all.equal(x, y)
-```
-
-
diff --git a/session_1/slides_a.Rmd b/session_1/slides_a.Rmd
deleted file mode 100644
index 6d8f10a357754c3247d6c051a4338ca5703eaa6c..0000000000000000000000000000000000000000
--- a/session_1/slides_a.Rmd
+++ /dev/null
@@ -1,330 +0,0 @@
----
-title: 'R#1: Introduction to R and RStudio'
-author: "Laurent Modolo [laurent.modolo@ens-lyon.fr](mailto:laurent.modolo@ens-lyon.fr)"
-date: "10 Oct 2019"
-output:
-  slidy_presentation:
-    highlight: tango
-  beamer_presentation:
-    theme: metropolis
-    slide_level: 3
-    fig_caption: no
-    df_print: tibble
-    highlight: tango
-    latex_engine: xelatex
----
-## R#1: Introduction to R and RStudio
-The goal of this practical is to familiarize yourself with R and the RStudio
-environment.
-
-The objectives of this session will be to:
-
-- Understand the purpose of each pane in RStudio
-- Do basic computation with R
-- Define variables and assign data to variables
-- Manage a workspace in R
-- Call functions
-- Manage packages
-
-## Acknowledgments
-
-\begin{columns}
-  \begin{column}{0.5\textwidth}
-    \includegraphics[width=\textwidth]{img/software_carpentry_logo}
-    {\bf https://software-carpentry.org/}
-    http://swcarpentry.github.io/r-novice-gapminder/
-  \end{column}
-  \begin{column}{0.5\textwidth}
-    \includegraphics[width=\textwidth]{img/r_for_data_science.png}
-  \end{column}
-\end{columns}
-
-## Some R background
-
-\includegraphics[width=40pt]{img/Rlogo.png}
-is a programming language and free software environment for statistical
-computing and graphics supported by the *R Foundation for Statistical Computing*.
-
-## Some R background
-
-\includegraphics[width=40pt]{img/Rlogo.png}
-
-- Created by **Ross Ihaka** and **Robert Gentleman**
-- initial version released in 1995
-- free and open-source implementation the S programming language
-- currently developed by the **R Development Core Team**.
-
-## Some R background
-
-Reasons to use \includegraphics[width=40pt]{img/Rlogo.png}
-
-- It’s free, well documented, and runs almost everywhere
-- it has a large (and growing) user base among scientists
-- it has a large library of external packages available for performing diverse tasks. 
-
-- **15,068** available packages on https://cran.r-project.org/
-- **3,087** available packages on http://www.bioconductor.org
-- **122,720** available repository on https://github.com/
-
-## Some R background
-
-\includegraphics[width=\textwidth]{img/R_terminal.png}
-
-## RStudio, the R IDE
-
-\begin{block}{IDR: Integrated development environment}
-application that provides {\bf comprehensive facilities} to computer programmers for
-software development
-\end{block}
-
-- free
-- open source
-
-## An interface
-
-\includegraphics[width=\textwidth]{img/RStudio.png}
-
-## The same console as before
-
-\includegraphics[width=\textwidth]{img/RStudio_console.png}
-
-## R as a calculator
-
-- Add: `+`
-- Divide: `/`
-- Multiply: `*`
-- Subtract: `-`
-- Exponents: `^` or `**`
-- Parentheses: `(`, `)`
-
-## R as a calculator
-
-```R
-1 + 100
-1 +
-```
-
-\pause
-
-```R
-3 + 5 * 2
-```
-
-```R
-(3 + 5) * 2
-```
-
-\pause
-
-```R
-(3 + (5 * (2 ^ 2))) # hard to read
-3 + 5 * 2 ^ 2       # clear, if you remember the rules
-3 + 5 * (2 ^ 2)     # if you forget some rules, this might help
-```
-
-\pause
-
-```R
-2/10000
-```
-
-\pause
-
-`2e-4` is shorthand for `2 * 10^(-4)`
-
-```R
-5e3
-```
-
-## Mathematical functions
-
-```R
-log(1)  # natural logarithm
-```
-
-\pause
-
-```R
-log10(10) # base-10 logarithm
-```
-
-\pause
-
-```R
-exp(0.5)
-```
-
-\pause
-
-Compute the factorial of `9`
-
-\pause
-
-```R
-factorial(9)
-```
-
-## Comparing things
-
-equality (note two equal signs read as "is equal to")
-```R
-1 == 1
-```
-\pause
-
-inequality (read as "is not equal to")
-```R
-1 != 2 
-```
-\pause
-
-less than
-```R
-1 < 2
-```
-\pause
-
-less than or equal to
-```R
-1 <= 1
-```
-\pause
-
-greater than
-```R
-1 > 0
-```
-
-## Variables and assignment
-
-`<-` is the assignment operator in R. (read as left member take right member value)
-
-```R
-x <- 1/40
-```
-
-```R
-x
-```
-
-## The environment
-
-\includegraphics[width=\textwidth]{img/RStudio_environment.png}
-
-## Variables and assignment
-
-```R
-log(x)
-x <- 100
-log(x)
-```
-\pause
-
-```R
-x <- x + 1
-y <- x * 2
-```
-
-\pause
-
-```R
-z <- "x"
-x + z
-```
-
-## Variables and assignment
-
-Variable names can contain letters, numbers, underscores and periods.
-
-They cannot start with a number nor contain spaces at all.
-
-Different people use different conventions for long variable names, these include
-
-```R
-periods.between.words
-underscores_between_words
-camelCaseToSeparateWords
-```
-
-What you use is up to you, but be consistent.
-
-\pause
-It is also possible to use the `=` operator for assignment but **don’t do it !**
-
-## Variables and assignment
-
-Which of the following are valid R variable names?
-
-```
-min_height
-max.height
-_age
-.mass
-MaxLength
-min-length
-2widths
-celsius2kelvin
-```
-
-**http://perso.ens-lyon.fr/laurent.modolo/R/1_a**
-
-## Functions are also variables
-
-```R
-logarithm <- log
-```
-
-\pause
-
-A R function can have different arguments
-
-```R
-function (x, base = exp(1))
-```
-
-- `base` is a named argument  are read from left to right
-- named arguments breaks the reading order
-- named arguments make your code more readable
-
-\pause
-
-To know more about the `log` function we can read its manual.
-
-```R
-help(log)
-```
-
-\pause
-
-```R
-?log
-```
-
-## Various output
-
-\includegraphics[width=\textwidth]{img/RStudio_outputs.png}
-
-## Functions are also variables
-
-Test that your `logarithm` function can work in base 10
-
-\pause
-
-```R
-10^logarithm(12, base = 10)
-```
-
-## Functions are also variables
-
-We can also define our own function with
-```R
-<FUNCTION_NAME> <- function(a, b){
-  <RESULT_1> <- <OPERATION_1>(a, b)
-  <RESULT_2> <- <OPERATION_2>(<RESULT_1>, b)
-  return(<RESULT_2>)
-}
-```
-
-\pause
-
-write a function to test the base of the logarithm function
\ No newline at end of file
diff --git a/session_1/slides_b.Rmd b/session_1/slides_b.Rmd
deleted file mode 100644
index bfd6d2680014bff39f05504c6507ebe450037c46..0000000000000000000000000000000000000000
--- a/session_1/slides_b.Rmd
+++ /dev/null
@@ -1,428 +0,0 @@
----
-title: 'R#1: Introduction to R and RStudio'
-author: "Laurent Modolo [laurent.modolo@ens-lyon.fr](mailto:laurent.modolo@ens-lyon.fr)"
-date: "10 Oct 2019"
-output:
-  slidy_presentation:
-    highlight: tango
-  ioslides_presentation:
-    highlight: tango
-  beamer_presentation:
-    theme: metropolis
-    slide_level: 3
-    fig_caption: no
-    df_print: tibble
-    highlight: tango
-    latex_engine: xelatex
----
-
-## R#1: Introduction to R and RStudio
-
-The goal of this practical is to familiarize yourself with R and the RStudio
-environment.
-
-The objectives of this session will be to:
-
-- Understand the purpose of each pane in RStudio
-- Do basic computation with R
-- Define variables and assign data to variables
-- Manage a workspace in R
-- Call functions
-- Manage packages
-
-**http://perso.ens-lyon.fr/laurent.modolo/R/session_1_a**
-
-Press **[alt] + [shift] + k**
-
-## Functions are also variables
-
-We can also define our own function with
-```R
-<FUNCTION_NAME> <- function(a, b){
-  <RESULT_1> <- <OPERATION_1>(a, b)
-  <RESULT_2> <- <OPERATION_2>(<RESULT_1>, b)
-  return(<RESULT_2>)
-}
-```
-
-\pause
-
-write a function to test the base of the logarithm function
-
-\pause
-
-```R
-base_test <- function(x, base){
-  log_result <- logarithm(x, base=base)
-  exp_result <- base^log_result
-  test_result <- x == exp_result
-  return(test_result)
-}
-```
-
-**http://perso.ens-lyon.fr/laurent.modolo/R/1_b**
-
-## Functions are also variables
-
-```R
-base_test <- function(x, base){
-  print(x)
-  log_result <- logarithm(x, base=base)
-  print(log_result)
-  exp_result <- base^log_result
-  print(exp_result)
-  print(x)
-  test_result <- x == exp_result
-  return(test_result)
-}
-```
-
-**http://perso.ens-lyon.fr/laurent.modolo/R/1_c**
-
-## Functions are also variables
-
-```R
-base_test <- function(x, base){
-  print(x)
-  log_result <- logarithm(x, base=base)
-  print(log_result)
-  exp_result <- base^log_result
-  print(exp_result)
-  print(x)
-  test_result <- isTRUE(all.equal(x, exp_result))
-  return(test_result)
-}
-```
-
-**http://perso.ens-lyon.fr/laurent.modolo/R/1_d**
-
-## Functions are also variables
-
-```R
-base_test <- function(x, base){
-  return(isTRUE(all.equal(x, base^logarithm(x, base=base))))
-}
-```
-
-**http://perso.ens-lyon.fr/laurent.modolo/R/1_e**
-
-## The environment
-
-\includegraphics[width=\textwidth]{img/RStudio_environment.png}
-
-## A code editor
-
-\includegraphics[width=\textwidth]{img/RStudio_editor.png}
-
-## A code editor
-
-RStudio offers you great flexibility in running code from within the editor window. There are buttons, menu choices, and keyboard shortcuts. To run the current line, you can
-
-- Click on the Run button above the editor panel, or
-- select “Run Lines” from the “Code” menu, or
-- hit Ctrl+Return in Windows or Linux or Cmd+Return on OS X. To run a block of code, select it and then Run. 
-
-If you have modified a line of code within a block of code you have just run, there is no need to reselect the section and Run, you can use the next button along, Rerun the previous region. This will run the previous code block including the modifications you have made.
-
-## A code editor
-
-Copy your `logarithm` and `base_test` into a `tp_1.R` file
-
-\pause
-
-We can now clean your environment
-
-```R
-rm(x)
-```
-
-\pause
-
-```R
-?rm
-```
-
-\pause
-
-```R
-ls()
-```
-
-\pause
-
-```R
-rm(list = ls())
-```
-
-## Installing packages
-
-```R
-install.packages("tidyverse")
-```
-
-```R
-install.packages("ggplot2")
-```
-
-## Installing packages
-
-\includegraphics[width=\textwidth]{img/RStudio_outputs.png}
-
-## Loading packages
-
-```R
-sessionInfo()
-```
-
-\pause
-
-```R
-library(tidyverse)
-```
-
-\pause
-
-```R
-sessionInfo()
-```
-
-\pause
-
-```R
-unloadNamespace("tidyverse")
-```
-
-\pause
-
-```R
-sessionInfo()
-```
-
-## Complex variable type
-
-## Vector (aka list)
-
-```R
-c(1, 2, 3, 4, 5)
-```
-
-\pause
-
-```R
-1:5
-```
-
-\pause
-
-```R
-2^(1:5)
-```
-
-\pause
-
-```R
-x <- 1:5
-2^x
-```
-
-\pause
-
-```R
-log(x)
-logarithm(x)
-base_test(x, base = 10)
-```
-
-## Vector (aka list)
-
-```R
-typeof(x)
-```
-
-\pause
-
-```R
-typeof(x + 0.5)
-```
-
-\pause
-
-```R
-is.vector(x)
-```
-
-\pause
-
-```R
-length(x)
-```
-
-\pause
-
-```R
-x[5]
-```
-
-\pause
-
-```R
-y <- c(a = 1, b = 2, c = 3, d = 4, e = 5)
-typeof(y)
-is.vector(y)
-names(y)
-y[1]
-y["a"]
-names(y) <- c("b")
-```
-
-\pause
-
-```R
-x == y
-all.equal(x, y)
-```
-
-## Vector challenge
-
-- use the `seq()` function to create a vector of even numbers
-- You can concatenate vector with `c(<VECTOR_1>, <VECTOR_2>)`, concatenate a vector of integers with a vector of the first 5 letters of the alphabet.
-- Check the default vectors `letters` and `LETTERS`, rewrite your previous command using them.
-- Create a vector giving you the correspondence between small case letters and upper case letters.
-
-## Vector challenge
-
-- use the `seq()` function to create a vector of even numbers
-```R
-seq(from=2, to=10, by=2)
-```
-- You can concatenate vector with `c(<VECTOR_1>, <VECTOR_2>)`, concatenate a vector of integers with a vector of the first 5 letters of the alphabet. What is the type of this vector.
-- Check the default vectors `letters` and `LETTERS`, rewrite your previous command using them.
-- Create a vector giving you the correspondence between small case letters and upper case letters.
-
-## Vector challenge
-
-- use the `seq()` function to create a vector of even numbers
-```R
-seq(from=2, to=10, by=2)
-```
-- You can concatenate vector with `c(<VECTOR_1>, <VECTOR_2>)`, concatenate a vector of integers with a vector of the first 5 letters of the alphabet. What is the type of this vector.
-- Check the default vectors `letters` and `LETTERS`, rewrite your previous command using them.
-- Create a vector giving you the correspondence between small case letters and upper case letters.
-
-## Vector challenge
-
-- use the `seq()` function to create a vector of even numbers
-- You can concatenate vector with `c(<VECTOR_1>, <VECTOR_2>)`, concatenate a vector of integers with a vector of the first 5 letters of the alphabet. What is the type of this vector.
-```R
-c(1:5, "a", "b", "c")
-typeof(c(1:5, "a", "b", "c"))
-```
-- Check the default vectors `letters` and `LETTERS`, rewrite your previous command using them.
-- Create a vector giving you the correspondence between small case letters and upper case letters.
-
-## Vector challenge
-
-- use the `seq()` function to create a vector of even numbers
-- You can concatenate vector with `c(<VECTOR_1>, <VECTOR_2>)`, concatenate a vector of integers with a vector of the first 5 letters of the alphabet. What is the type of this vector.
-- Check the default vectors `letters` and `LETTERS`, rewrite your previous command using them.
-```R
-c(1:5, letters[1:3])
-```
-- Create a vector giving you the correspondence between small case letters and upper case letters.
-
-## Vector challenge
-
-- use the `seq()` function to create a vector of even numbers
-- You can concatenate vector with `c(<VECTOR_1>, <VECTOR_2>)`, concatenate a vector of integers with a vector of the first 5 letters of the alphabet. What is the type of this vector.
-- Check the default vectors `letters` and `LETTERS`, rewrite your previous command using them.
-- Create a vector giving you the correspondence between small case letters and upper case letters.
-```R
-rosette <- LETTERS
-names(rosette) <- letters
-rosette["b"]
-rosette[13]
-```
-
-## Matrix
-
-In R matrices are two dimensional vectors
-
-```R
-matrix_example <- matrix(1:(6*3), ncol=6, nrow=3)
-matrix_example
-```
-
-\pause
-
-```R
-class(matrix_example)
-nrow(matrix_example)
-ncol(matrix_example)
-```
-
-\pause
-
-```R
-matrix_example[2, 3]
-```
-
-## DataFrame
-
-In R `data.frame` are a table type with mixed type
-
-```R
-data_frame_example <- data.frame(numbers=1:26, 
-                                 letters=letters, 
-                                 LETTERS=LETTERS)
-data_frame_example
-```
-
-\pause
-
-```R
-class(data_frame_example)
-nrow(data_frame_example)
-ncol(data_frame_example)
-names(data_frame_example)
-```
-
-\pause
-
-```R
-data_frame_example[2, 3]
-data_frame_example["numbers"]
-```
-
-## List
-
-In R `list` are multitypes object
-
-```R
-list(a = "test", b = 1)
-```
-
-\pause
-
-```R
-list(a = "test", b = 1:5)
-```
-
-\pause
-
-```R
-z <- list(
-  a = "test",
-  b = 1:5,
-  c = data.frame(numbers=1:26, letters=letters, LETTERS=LETTERS)
-)
-```
-
-\pause
-
-```R
-list(
-  a = "test",
-  b = 1:5,
-  c = z
-)
-```
\ No newline at end of file
diff --git a/src/style.css b/src/style.css
new file mode 100644
index 0000000000000000000000000000000000000000..c71331b12b70ad47b489738067d792b600126ffa
--- /dev/null
+++ b/src/style.css
@@ -0,0 +1,49 @@
+@import url('https://fonts.googleapis.com/css2?family=Yanone+Kaffeesatz:wght@400bbbh;600&display=swap');
+
+h3 { /* Header 3 */
+  font-family: 'Yanone Kaffeesatz', sans-serif;
+  color: #729FCF ;
+}
+
+h2 { /* Header 2 */
+  font-family: 'Yanone Kaffeesatz', sans-serif;
+  color: darkblue ;
+}
+
+h1 { /* Header 1 */
+  font-family: 'Yanone Kaffeesatz', sans-serif;
+  color: #034b6f ;
+}
+
+#pencadre{
+  border:1px; 
+  border-style:solid; 
+  border-color: #034b6f; 
+  background-color: #EEF3F9; 
+  padding: 1em;
+  text-align: center ;
+  border-radius : 5px 4px 3px 2px;
+}
+
+legend{
+  color: #034b6f ;
+}
+
+#pquestion {
+  color: darkgreen;
+  font-weight: bold;
+}
+
+.centered {
+  display: flex;
+  justify-content: center;
+}
+
+pre.r {
+  background-color: #c4c4c4;
+}
+
+pre:not([class]) {
+    background-color: #1a1a1a;
+    color: white;
+}