mydata= rnorm(200, 3, 25) #raw data generation

mydata=as.integer(mydata) #float to integer type value conversion

hist(mydata, col = "yellow") # plot a histogram in yellow color