My project This is my initial project. Here some example code: set.seed(3312) x <- rnorm(100) hist(x)