# NOT RUN {
# 30 observations from two von Mises distributions
library(circular)
x = c(rvonmises(10, circular(pi/4), 5), rvonmises(20, circular(pi), 20))
cdotplot(x) # area-proportional dot plot
cdotplot(x, area = FALSE) # height-proportional dot plot
# 900 observations from two von Mises distributions
y = c(rvonmises(300, circular(pi/4), 5), rvonmises(600, circular(pi), 20))
cdotplot(y, nbins=76, unit = 10) # area-proportional (partial) dot plot
cdotplot(y, nbins=76, unit = 10, area = FALSE) # height-proportional
# }
Run the code above in your browser using DataLab