Computes the Bimodality Amplitude of [Zhang et al., 2003]
FALSE, TRUE if a figure with the antimodes and peaks is plotted
This function calculates the Bimodality Ampltiude of a data vector. This is a measure of the proportion of bimodality and the existence of bimodality. The value lies between zero and one (that is: [0,1]) where the value of zero implies that the data is unimodal and the value of one implies the data is two point masses.
function was rewritten after the flow of a function of Sathish Deevi because the original function was incorrect.
Zhang, C., Mapes, B., & Soden, B.: Bimodality in tropical water vapour, Quarterly Journal of the Royal Meteorological Society, Vol. 129(594), pp. 2847-2866, 2003.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
#Example 1 data<-c(rnorm(299,0,1),rnorm(299,5,1)) BimodalityAmplitude(data,TRUE) #Example 2 dist1<-rnorm(2100,5,2) dist2<-dist1+11 data<-c(dist1,dist2) BimodalityAmplitude(data,TRUE) #Example 3 dist1<-rnorm(210,-15,1) dist2<-rep(dist1,3)+30 data<-c(dist1,dist2) BimodalityAmplitude(data,TRUE) #Example 4 data<-runif(1000,-15,1) BimodalityAmplitude(data,TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.