Question
Hi, can someone help me with this MATHEMATICA question Part 4 Surface of Revolution: RevolutionPlot3D -- Create a plot of revfct over [revDomainStart, revDomainEnd] as
Hi, can someone help me with this MATHEMATICA question
Part 4 Surface of Revolution: RevolutionPlot3D -- Create a plot of revfct over [revDomainStart, revDomainEnd] as defined below See the MM tutorial from class for assistance on the MM plotting functions. -- Complete the function revfct3D that defines the generatrix of the surface of revolution You will need to read the Help for RevolutionPlot3D to understand what the {x,y,z} coordinates should be. -- Create a plot of revfct3D that will appear as a curve of the RevolutionPlot3D surface Remove the comments around revfct3Dplot
(* domain for revfct *) revDomainStart = 0.0; revDomainEnd = 1.0;
(* input function used to create generating curve - generatrix *) revfct[t_] := t^2 + Sin[10*Pi*t]*0.1;
(* TO DO *) (* 2d plot of function statement goes here *)
(* TO DO *) (* generatrix from revfct *) revfct3D[s_] := {0.0, 0.0, 0.0};
(* TO DO *) (* plot generatrix in 3D *) (* Add PlotStyle\[Rule]{Red,Thick} *) (* revfct3Dplot = ... *) revfct[t_] = ParametricPlot3D[revfct3D[t] {t, revDomainStart, revDomainEnd}, PlotStyle -> {Red, Thick}];
(* create surface plot *) rplot = RevolutionPlot3D[ revfct[t], {t, revDomainStart, revDomainEnd}, PlotStyle -> Opacity[0.3]];
(* TO DO *) (* plot surface and curve on surface *) Show[{(*revfct3Dplot,*) rplot}, PlotRange -> All]
Step by Step Solution
There are 3 Steps involved in it
Step: 1
Get Instant Access to Expert-Tailored Solutions
See step-by-step solutions with expert insights and AI powered tools for academic success
Step: 2
Step: 3
Ace Your Homework with AI
Get the answers you need in no time with our AI-driven, step-by-step assistance
Get Started