Re: Plot of Nonlinear function
- To: mathgroup at smc.vnet.net
- Subject: [mg40904] Re: Plot of Nonlinear function
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Wed, 23 Apr 2003 05:17:51 -0400 (EDT)
- Organization: Universitaet Leipzig
- References: <b8582c$5pj$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
ContourPlot[(theta1 - Pi/2)*
Sin[theta1 + theta2] - (theta2 - Pi/2)*(Sin[theta1] +
Sin[theta1 + theta2]), {theta1, -2Pi, 2Pi}, {theta2, -2Pi,
2Pi},
Contours -> {0}, ContourShading -> False, PlotPoints -> 64]
or
Needs["Graphics`ImplicitPlot`"]
ImplicitPlot[(theta1 - Pi/2)*
Sin[theta1 + theta2] - (theta2 - Pi/2)*(Sin[theta1] +
Sin[theta1 + theta2]) == 0, {theta1, -2Pi, 2Pi}, {theta2,
-2Pi,
2Pi}]
Regards
Jens
Jong Choi wrote:
>
> I want to plot this funcion with theta1 vs. theta2
>
> (theta1-pi/2) * Sin[theta1+theta2] - (theta2-pi/2) * (Sin[theta1] +
> Sin[theta1+theta2]) = 0
>
> this function is not linear.
> the values of x axis are theta1 and those of y axis are theta2.
> I think I have to solve this fuction first and then plot.
>
> Please give some idea for me
> Thanks,
> Jong