Bimodal distribution

Studying Bimodal distribution, but don’t know what function can detect that in R