Mathematica graphing problem - twisted plane

Click For Summary
SUMMARY

The discussion centers on graphing a twisted plane in Mathematica. The user seeks to visualize a rectangle in the x,z plane, twisted such that one end aligns with the y-axis while the other remains parallel to the x-axis. The suggested solution involves using the ParametricPlot3D function with the parameters {v, u Cos[v], -u Sin[v]}, where u and v can be adjusted to achieve the desired effect. This approach effectively demonstrates the twisting and finite width of the plane.

PREREQUISITES
  • Familiarity with Mathematica syntax and functions
  • Understanding of 3D graphing concepts
  • Knowledge of parametric equations
  • Basic grasp of trigonometric functions and their applications in graphing
NEXT STEPS
  • Explore the use of ParametricPlot3D in Mathematica for complex shapes
  • Learn about manipulating parameters in 3D plots to achieve specific visual effects
  • Investigate advanced graphing techniques in Mathematica, such as MeshFunctions
  • Study the application of trigonometric functions in 3D modeling and visualization
USEFUL FOR

Mathematica users, 3D modelers, educators in mathematics, and anyone interested in advanced graphing techniques for visualizing complex geometric shapes.

anonamatron
Messages
1
Reaction score
0
Hi folks,

I'm trying to graph something in Mathematica, and honestly don't know where to start.

Imagine you have a rectangle in the x,z plane of a 3D space. Now, twist one end of the rectange so it's parallel to the y axis. The opposite end remains parallel to the x axis. Between the two, you basically have a line segment at each point along a segment of the z axis, with the angle it makes increasing steadily.

The best I've come up with is Plot3D[x Tan[\[Pi]/2 z/4], {x, -2, 2}, {z, 0, 4}] (the numbers are arbitrary), but that doesn't have the finite width I'm looking for - you can see the plane rotating all right, but no edges will ever come into view.

Have I explained that clearly enough?

Any ideas?
 
Physics news on Phys.org
Try ParametricPlot3D[{v, u Cos[v], -u Sin[v]}, {u, 0, 1}, {v, 0, \[Pi]/
2}] . I think this is what you want. You might have to play with u and v, but I think you get the idea.
 

Similar threads

  • · Replies 4 ·
Replies
4
Views
3K
  • · Replies 5 ·
Replies
5
Views
3K
  • · Replies 3 ·
Replies
3
Views
4K
  • · Replies 2 ·
Replies
2
Views
5K
  • · Replies 2 ·
Replies
2
Views
1K
  • · Replies 2 ·
Replies
2
Views
2K
  • · Replies 7 ·
Replies
7
Views
2K
  • · Replies 1 ·
Replies
1
Views
2K
Replies
3
Views
1K
  • · Replies 2 ·
Replies
2
Views
4K