From: maria giovanna dainotti on 2 Jul 2010 02:54 Dear Math Group, I have the following problem when I do a contourplot I can't use the boolean variabile. This is the function for which I would like to have the contours R1=1.029 R2=2.92 R3=20 e1=300 e2=1 e3=100 i=pi/12 �ContourPlot[2*R3*Sin[ArcCos[Re[x/R3]]]*e3+2*R2/Cos[i]*Sin[ArcCos[Re[x/2.92]]]*(e2-e3)+2*R1/Cos[i]*Sin[ArcCos[Re[x/R1]]]*(e1-e2),(2*R3*Sin[ArcCos[Re[x/R3]]]*e3+2*R2/Cos[i]*Sin[ArcCos[Re[x/R2]]]*(e2-e3))*(Boole[-R2<x<-R1]+Boole[R2>x>R1]),2*R3*Sin[ArcCos[Re[x/R3]]]*e3*(Boole[x<-R2]+Boole[x>R2])+R3*Cos[ArcSin[y/R3]],{x,-2,2 },{y,-20,20}] Thanks a lot for your help Maria
From: Leonid Shifrin on 2 Jul 2010 07:27 Hi Maria, First, your <pi> in <i==pi/12> must be <Pi>, I guess. Then, you list several functions separated by a comma, and ContourPlot does not understand. This works, for instance: ContourPlot[ 2*R3*Sin[ArcCos[Re[x/R3]]]*e3 + 2*R2/Cos[i]*Sin[ArcCos[Re[x/2.92]]]*(e2 - e3) + 2*R1/Cos[i]*Sin[ArcCos[Re[x/R1]]]*(e1 - e2), {x, -2, 2}, {y, -20, 20}] What did you mean by separating functions with a comma - what did you try to achieve? Knowing this it would be easier to help. Regards, Leonid On Thu, Jul 1, 2010 at 11:54 PM, maria giovanna dainotti < mariagiovannadainotti(a)yahoo.it> wrote: > Dear Math Group, > I have the following problem when I do a contourplot I can't use > the boolean variabile. This is the function for which I would like > to have the contours > > R1==1.029 > R2==2.92 > R3= > e1==300 > e2==1 > e3==100 > i==pi/12 > > ContourPlot[2*R3*Sin[ArcCos[Re[x/R3]]]*e3+2*R2/Cos[i]*Sin[ArcCos[Re[x/2.= 92]]]*(e2-e3)+2*R1/Cos[i]*Sin[ArcCos[Re[x/R1]]]*(e1-e2),(2*R3*Sin[ArcCos[Re= [x/R3]]]*e3+2*R2/Cos[i]*Sin[ArcCos[Re[x/R2]]]*(e2-e3))*(Boole[-R2<x<-R1]+Bo= ole[R2>x>R1]),2*R3*Sin[ArcCos[Re[x/R3]]]*e3*(Boole[x<-R2]+Boole[x>R2])+R3*C= os[ArcSin[y/R3]],{x,-2,2 > },{y,-20,20}] > > > Thanks a lot for your help > Maria >
From: Peter Pein on 3 Jul 2010 08:17 Am Fri, 2 Jul 2010 06:54:31 +0000 (UTC) schrieb maria giovanna dainotti <mariagiovannadainotti(a)yahoo.it>: > Dear Math Group, > I have the following problem when I do a contourplot I can't use > the boolean variabile. This is the function for which I would like > to have the contours > > R1=1.029 > R2=2.92 > R3 > e1=300 > e2=1 > e3=100 > i=pi/12 > > =C2 ContourPlot[]==0==Im[y,{x,-2,2 },{y,-20,20}] > > > Thanks a lot for your help > Maria Hi Maria, 1.) pi is just any variable; I guess you want Pi (with capital P) and the Re[] around x/"real valued constant" is superfluous. 2.) what exactly do you expect from a call to Contourplot with three expressions (not wrapped by a list). Did you want ParametricPlot3D (which looks quite boring). Are the three expressions part of a vector and you want the norm? That would lead to a few vertical stripes. 3.) It could speed thing up to throw FullSimplify once onto the expression(s) to be plotted: In[1]:= R1=1029/1000; R2=292/100; R3; e1=300; e2=1; e3=100; i=Pi/12; vec=FullSimplify[{ 2*R3*Sin[ArcCos[Re[x/R3]]]*e3+2*R2/Cos[i]*Sin[ArcCos[Re[x/R2]]]*(e2-e3)+2*R= 1/Cos[i]*Sin[ArcCos[Re[x/R1]]]*(e1-e2),(2*R3*Sin[ArcCos[Re[x/R3]]]*e3+2*R2/= Cos[i]*Sin[ArcCos[Re[x/R2]]]*(e2-e3))*(Boole[-R2<x<-R1]+Boole[R2>x>R1]),2*R= 3*Sin[ArcCos[Re[x/R3]]]*e3*(Boole[x<-R2]+Boole[x>R2])+R3*Cos[ArcSin[y/R3]]}= ,{x,y}\[Element]Reals] Out[8]= {200 Sqrt[400-x^2]+(299 Sqrt[1058841-1000000 x^2]-3960 Sqrt[5329-625 x^2])/(125 (Sqrt[2]+Sqrt[6])),4/25 (1250 Sqrt[400-x^2]-99 Sqrt[(-2+Sqrt[3]) (-5329+625 x^2)]) (Boole[73/25>x>1029/1000]+Boole[-(73/25)<x<-(1029/1000)]),Sqrt[400-y^2]+200 Sqrt[400-x^2] (Boole[25 x>73]+Boole[x<-(73/25)])} Peter P.S.: Claws-Mail opened this again; maybe I forgot to send it maybe this posting comes twice. In the latter case: my apologies to the brave moderator.
|
Pages: 1 Prev: A modified StyleSheet results in FontSize fluctuations Next: Simple String question |