amrramadaneg

Prof. Amr Ramadan

71 Reputation

8 Badges

9 years, 107 days

MaplePrimes Activity


These are replies submitted by amrramadaneg

thank you pagan  that is what I realy want.

thank you pagan  that is what I realy want.

But if I have a numeric values for the function and numeric values for the variables is there a method to do it like one dimension

plot(<v|F>)   where v and F are vector 

thanks

But if I have a numeric values for the function and numeric values for the variables is there a method to do it like one dimension

plot(<v|F>)   where v and F are vector 

thanks

@Jarekkk 

thanks at all Jarekkk, I am grateful to you

@Jarekkk 

thanks at all Jarekkk, I am grateful to you

@Jarekkk 

When i use 

M := 10;
f :=i -> 2*(i-1)*Pi/M :       f(M+1) := f(1):        v := Vector(M+1, f);

x := cos~(v)/~(1+~ k*cos~(2*v));              y:= sin~(v)/~(1+~ k*cos~(2*v));  

x1dot := diff~(x, v);                                   y1dot :=diff~(y, v);

x2dot := diff~(x, v$2));                              y2dot := diff~(y, v$2));

it does not work numerically.

But when i use f :=i ->theta[i]    instead of     f :=i -> 2*(i-1)*Pi/M   it works well

@Jarekkk 

When i use 

M := 10;
f :=i -> 2*(i-1)*Pi/M :       f(M+1) := f(1):        v := Vector(M+1, f);

x := cos~(v)/~(1+~ k*cos~(2*v));              y:= sin~(v)/~(1+~ k*cos~(2*v));  

x1dot := diff~(x, v);                                   y1dot :=diff~(y, v);

x2dot := diff~(x, v$2));                              y2dot := diff~(y, v$2));

it does not work numerically.

But when i use f :=i ->theta[i]    instead of     f :=i -> 2*(i-1)*Pi/M   it works well

@Jarekkk    thanks Jarekkk

but when i want the program do the your steps numerically    i found an error?



M := 10;
f :=i -> 2*(i-1)*Pi/M :       f(M+1) := f(1):        v := Vector(M+1, f);

x := cos~(v)/~(1+~ k*cos~(2*v));              y:= sin~(v)/~(1+~ k*cos~(2*v));  

x1dot := diff~(x, v);                                   y1dot :=diff~(y, v);

x2dot := diff~(x, v$2));                              y2dot := diff~(y, v$2));

instead by file

@Jarekkk    thanks Jarekkk

but when i want the program do the your steps numerically    i found an error?



M := 10;
f :=i -> 2*(i-1)*Pi/M :       f(M+1) := f(1):        v := Vector(M+1, f);

x := cos~(v)/~(1+~ k*cos~(2*v));              y:= sin~(v)/~(1+~ k*cos~(2*v));  

x1dot := diff~(x, v);                                   y1dot :=diff~(y, v);

x2dot := diff~(x, v$2));                              y2dot := diff~(y, v$2));

instead by file

If      x:= cos(θ[i])/(1+cos(θ[i]);     y[i] := sin(θ[i])/((1+cos(θ[i])

what can i do 

If      x:= cos(θ[i])/(1+cos(θ[i]);     y[i] := sin(θ[i])/((1+cos(θ[i])

what can i do 

thanks, but 

θ[1] := 0; for q to M+1 do θ[q+1] := θ[q]+dθ; end do     dθ=2Pi/M,   M:=100

when i use this program i found an error,

thanks, but 

θ[1] := 0; for q to M+1 do θ[q+1] := θ[q]+dθ; end do     dθ=2Pi/M,   M:=100

when i use this program i found an error,

I mean

θ[1] := 0; for q to M+1 do θ[q+1] := θ[q]+dθ; end do     dθ=2Pi/M,   M:=100

1 2 3 4 5 6 Page 3 of 6