# Generate a set of 100 random numbers
# in a normal distribution about 0

rand_set<-rnorm(100)

# View the first 10 elements

rand_set[1:10]

# Take the mean and SD of the set

mean(rand_set)
sd(rand_set)

# Draw a histogram of the set with 12 bins

hist(rand_set,breaks=12)