Skip to main content
Formatted special characters
Source Link
MarcoB
  • 67.7k
  • 18
  • 96
  • 198

I'm trying to use Manipulate with ParametricPlot3D, but the buttons does not appear. Someone has an idea why? Here's the code:

Remove["Global`*"]
ClearAll["Global``*"]

Manipulate[
 \[Xi]0ξ0 = 1 + 1*I ;
 F1[x_, y_] :=    
  1/2*Re[(N[Log[x + I*y], 3] - (x + I*y)^4/4) - (N[Log[\[Xi]0]N[Log[ξ0], 
        3] - (\[Xi]0ξ0)^4/4)];
 F2[x_, y_]   :=   -1/2*
   Im[(N[Log[x + I*y], 3] + (x + I*y)^4/4) - (N[Log[\[Xi]0]N[Log[ξ0], 
        3] + (\[Xi]0ξ0)^4/4)] ;
 F3[x_, y_]   :=    2*Re[(x + I*y)^2 - (\[Xi]0ξ0)^2] ;
 
 ParametricPlot3D[{F1[x, y], F2[x, y], F3[x, y]}, {x, a, b}, {y, c, 
   d}], {a, -2, -4, Appearance \[RightArrow] "Open"}, {b, 2, 4, 
  Appearance \[RightArrow] "Open"}, {c, -2, -4, 
  Appearance \[RightArrow] "Open"}, {d, 2, 4, 
  Appearance \[RightArrow] "Open"}]

Image

I'm trying to use Manipulate with ParametricPlot3D, but the buttons does not appear. Someone has an idea why? Here's the code:

Remove["Global`*"]
ClearAll["Global``*"]

Manipulate[
 \[Xi]0 = 1 + 1*I ;
 F1[x_, y_] :=    
  1/2*Re[(N[Log[x + I*y], 3] - (x + I*y)^4/4) - (N[Log[\[Xi]0], 
        3] - (\[Xi]0)^4/4)];
 F2[x_, y_]   :=   -1/2*
   Im[(N[Log[x + I*y], 3] + (x + I*y)^4/4) - (N[Log[\[Xi]0], 
        3] + (\[Xi]0)^4/4)] ;
 F3[x_, y_]   :=    2*Re[(x + I*y)^2 - (\[Xi]0)^2] ;
 
 ParametricPlot3D[{F1[x, y], F2[x, y], F3[x, y]}, {x, a, b}, {y, c, 
   d}], {a, -2, -4, Appearance \[RightArrow] "Open"}, {b, 2, 4, 
  Appearance \[RightArrow] "Open"}, {c, -2, -4, 
  Appearance \[RightArrow] "Open"}, {d, 2, 4, 
  Appearance \[RightArrow] "Open"}]

Image

I'm trying to use Manipulate with ParametricPlot3D, but the buttons does not appear. Someone has an idea why? Here's the code:

Remove["Global`*"]
ClearAll["Global``*"]

Manipulate[
 ξ0 = 1 + 1*I ;
 F1[x_, y_] :=    
  1/2*Re[(N[Log[x + I*y], 3] - (x + I*y)^4/4) - (N[Log[ξ0], 
        3] - (ξ0)^4/4)];
 F2[x_, y_]   :=   -1/2*
   Im[(N[Log[x + I*y], 3] + (x + I*y)^4/4) - (N[Log[ξ0], 
        3] + (ξ0)^4/4)] ;
 F3[x_, y_]   :=    2*Re[(x + I*y)^2 - (ξ0)^2] ;
 
 ParametricPlot3D[{F1[x, y], F2[x, y], F3[x, y]}, {x, a, b}, {y, c, 
   d}], {a, -2, -4, Appearance  "Open"}, {b, 2, 4, 
  Appearance  "Open"}, {c, -2, -4, 
  Appearance  "Open"}, {d, 2, 4, 
  Appearance  "Open"}]

Image

added 4 characters in body
Source Link
kglr
  • 400.5k
  • 18
  • 488
  • 929

I'm trying to use ManipulateManipulate with ParametricPlot3DParametricPlot3D, but the buttons does not appear. Someone has an idea why? Here's the code:

Remove["Global`*"]
ClearAll["Global``*"]

Manipulate[
 \[Xi]0 = 1 + 1*I ;
 F1[x_, y_] :=    
  1/2*Re[(N[Log[x + I*y], 3] - (x + I*y)^4/4) - (N[Log[\[Xi]0], 
        3] - (\[Xi]0)^4/4)];
 F2[x_, y_]   :=   -1/2*
   Im[(N[Log[x + I*y], 3] + (x + I*y)^4/4) - (N[Log[\[Xi]0], 
        3] + (\[Xi]0)^4/4)] ;
 F3[x_, y_]   :=    2*Re[(x + I*y)^2 - (\[Xi]0)^2] ;
 
 ParametricPlot3D[{F1[x, y], F2[x, y], F3[x, y]}, {x, a, b}, {y, c, 
   d}], {a, -2, -4, Appearance \[RightArrow] "Open"}, {b, 2, 4, 
  Appearance \[RightArrow] "Open"}, {c, -2, -4, 
  Appearance \[RightArrow] "Open"}, {d, 2, 4, 
  Appearance \[RightArrow] "Open"}]

Image

I'm trying to use Manipulate with ParametricPlot3D, but the buttons does not appear. Someone has an idea why? Here's the code:

Remove["Global`*"]
ClearAll["Global``*"]

Manipulate[
 \[Xi]0 = 1 + 1*I ;
 F1[x_, y_] :=    
  1/2*Re[(N[Log[x + I*y], 3] - (x + I*y)^4/4) - (N[Log[\[Xi]0], 
        3] - (\[Xi]0)^4/4)];
 F2[x_, y_]   :=   -1/2*
   Im[(N[Log[x + I*y], 3] + (x + I*y)^4/4) - (N[Log[\[Xi]0], 
        3] + (\[Xi]0)^4/4)] ;
 F3[x_, y_]   :=    2*Re[(x + I*y)^2 - (\[Xi]0)^2] ;
 
 ParametricPlot3D[{F1[x, y], F2[x, y], F3[x, y]}, {x, a, b}, {y, c, 
   d}], {a, -2, -4, Appearance \[RightArrow] "Open"}, {b, 2, 4, 
  Appearance \[RightArrow] "Open"}, {c, -2, -4, 
  Appearance \[RightArrow] "Open"}, {d, 2, 4, 
  Appearance \[RightArrow] "Open"}]

Image

I'm trying to use Manipulate with ParametricPlot3D, but the buttons does not appear. Someone has an idea why? Here's the code:

Remove["Global`*"]
ClearAll["Global``*"]

Manipulate[
 \[Xi]0 = 1 + 1*I ;
 F1[x_, y_] :=    
  1/2*Re[(N[Log[x + I*y], 3] - (x + I*y)^4/4) - (N[Log[\[Xi]0], 
        3] - (\[Xi]0)^4/4)];
 F2[x_, y_]   :=   -1/2*
   Im[(N[Log[x + I*y], 3] + (x + I*y)^4/4) - (N[Log[\[Xi]0], 
        3] + (\[Xi]0)^4/4)] ;
 F3[x_, y_]   :=    2*Re[(x + I*y)^2 - (\[Xi]0)^2] ;
 
 ParametricPlot3D[{F1[x, y], F2[x, y], F3[x, y]}, {x, a, b}, {y, c, 
   d}], {a, -2, -4, Appearance \[RightArrow] "Open"}, {b, 2, 4, 
  Appearance \[RightArrow] "Open"}, {c, -2, -4, 
  Appearance \[RightArrow] "Open"}, {d, 2, 4, 
  Appearance \[RightArrow] "Open"}]

Image

Source Link

Using Manipulate with ParametricPlot3D: buttons does not appear

I'm trying to use Manipulate with ParametricPlot3D, but the buttons does not appear. Someone has an idea why? Here's the code:

Remove["Global`*"]
ClearAll["Global``*"]

Manipulate[
 \[Xi]0 = 1 + 1*I ;
 F1[x_, y_] :=    
  1/2*Re[(N[Log[x + I*y], 3] - (x + I*y)^4/4) - (N[Log[\[Xi]0], 
        3] - (\[Xi]0)^4/4)];
 F2[x_, y_]   :=   -1/2*
   Im[(N[Log[x + I*y], 3] + (x + I*y)^4/4) - (N[Log[\[Xi]0], 
        3] + (\[Xi]0)^4/4)] ;
 F3[x_, y_]   :=    2*Re[(x + I*y)^2 - (\[Xi]0)^2] ;
 
 ParametricPlot3D[{F1[x, y], F2[x, y], F3[x, y]}, {x, a, b}, {y, c, 
   d}], {a, -2, -4, Appearance \[RightArrow] "Open"}, {b, 2, 4, 
  Appearance \[RightArrow] "Open"}, {c, -2, -4, 
  Appearance \[RightArrow] "Open"}, {d, 2, 4, 
  Appearance \[RightArrow] "Open"}]

Image