optDesign function

Function to calculate optimal designs