# First set the following code

par(mar=rep(2,4))

# Create a random number 

hist(rnorm(1000))