# NOT RUN {
## Generate 100 samples from a two component Guassian curve
samples <- rbinorm(n=100, mean1=10, mean2=20, sd1=1, sd2=2, prop=.5)
## Plot distribution of simulated data
plot(density(samples))
# }
Run the code above in your browser using DataLab