R Notebook

sample1 <- rnorm(40,10,3)
sample2 <- rnorm(40,10,3)
sample3 <- rnorm(40,10,3)
sample4 <- rnorm(40,10,3)
par(mfrow=c(2,2))
hist1 <- hist(sample1)
hist2 <- hist(sample2)

hist3 <- hist(sample3)
hist4 <- hist(sample4)