Message Boards

WOLFRAM COMMUNITY

3178 Views

3 Replies

0 Total Likes

View groups...

Follow this post

Share this post:

GROUPS:

Wolfram Language

How can I get this ParametricPlot3D to use a 2D Slider to control it?

Michael Harcrow

Michael Harcrow, University of North Texas

Posted 9 years ago

Attachments:

POSTED BY: Michael Harcrow

3 Replies

Sort By:

Sean Clarke

Sean Clarke, Wolfram Research

Posted 9 years ago

You might also consider using IntervalSlider. http://reference.wolfram.com/language/ref/IntervalSlider.html

POSTED BY: Sean Clarke

Gianluca Gorni

Gianluca Gorni, University of Udine

Posted 9 years ago

I would do it with DynamicModule: DynamicModule[{p = {-1, -1}, q = {2, 2}}, Row[{LocatorPane[Dynamic[{p, q}], Graphics[{Gray, Dynamic@Rectangle[p, q]}, PlotRange -> {{-2, 5}, {-2, 5}}, Frame -> True]], Dynamic@ With[{xmin = p[[1]], xmax = q[[1]], ymin = p[[2]], ymax = q[[2]]}, ParametricPlot3D[f[u, v], {u, xmin, xmax}, {v, ymin, ymax}]]}]]

I would do it with DynamicModule:

DynamicModule[{p = {-1, -1}, q = {2, 2}},
 Row[{LocatorPane[Dynamic[{p, q}],
    Graphics[{Gray, Dynamic@Rectangle[p, q]},
     PlotRange -> {{-2, 5}, {-2, 5}}, Frame -> True]],
   Dynamic@
    With[{xmin = p[[1]], xmax = q[[1]], ymin = p[[2]], 
      ymax = q[[2]]},
     ParametricPlot3D[f[u, v], {u, xmin, xmax}, {v, ymin, ymax}]]}]]

POSTED BY: Gianluca Gorni

Michael Harcrow

Michael Harcrow, University of North Texas

Posted 9 years ago

This does work pretty well. However I would like to move it to just have one moving piece in the locator instead of two. Either way this will do. Thank you for your help!

POSTED BY: Michael Harcrow

Reply to this discussion

Reply Preview

Attachments

Remove Add a file to this post

Follow this discussion

or Discard

Group Abstract

Feedback