How can I create a new window with a Manipulate expression?
Currently I'm using:
Manipulate[ {options, {ODE, r2, ViewPD, IC}, Column[{ Row[{Style["ODE: ", Italic] }]}], {{ODE, x^2 + r, "x[t]="}, ControlType -> InputField}, Grid[{{"Phase Diagram: "}}], {{ViewPD, False, "Show PD:"}, {True, False}, ControlType -> RadioButtonBar}, {{IC, "{{r,x}}", "Initial Conditions:"}, InputField}, Grid[{{"Vector Field: "}}], {{ViewPD, False, "Show PD:"}, {True, False}, ControlType -> RadioButtonBar}, {{IC, "{{r,x}}", "Initial Conditions:"}, InputField}, Grid[{{"Poincare Sections: "}}], {{ViewPD, False, "Show PD:"}, {True, False}, ControlType -> RadioButtonBar}, {{IC, "{{r,x}}", "Initial Conditions:"}, InputField}, ControlPlacement -> Left] The result is displayed in the notebook containing the Manipulate expression. Now I need the result to be displayed in a new window.