How do you obtain the actual polynomial function associated with a PDF curve in R?

Question

I am doing an experiment in school where I am analyzing the effects that twisting a wind turbine rotor blade has on the amount of power that the turbine outputs.

In m