Create bimodal_test.R

Bimodal Plot
Will implement multivariate testing for two nulls.