[R] How to use density function to find h_{k}

[Patrick Wang]

Hi, All:

How can I use the density function to find the minimum of the bandwidth
make the
density function one mode, 2 mode, 3 mode etc.

It will be impossible to try all possible bandwidths to then plot the pdf
to see how many modes it has. Is there an automatic way to do this

Like for loop 1000, try bandwidth from (0, 1). is there a function to get
how many modes from the density function?

Thanks
pat