Wolfram mathematica 确定在x-z平面中，$f（z，t，x）$对于$0<；的所有值为负值的位置；t<\圆周率$

我想在$z-x$平面中标记区域，其中已知函数$f（x，z，t）$对于$0的所有值都是负数 我该怎么做？我不想在$3D$中绘制$f$。有人能帮我吗

函数f（t，x，z）如下所示：

Re[0.125 (-21.2 + 
   Re[2 z Cos[2 t] - 
     2 z Cos[2 t]^2 + (2. E^(-I t) (E^(2 I t) (-8. - 3. x) z + 
          E^(12 I t) (-8. - 3. x) z + x z + E^(14 I t) x z + 
          E^(6 I t) (105.6 + 79.2 x - 8. z - 1. x z) + 
          E^(8 I t) (105.6 + 79.2 x - 8. z - 1. x z) + 
          E^(4 I t) (-79.2 x + 16. z + 3. x z) + 
          E^(10 I t) (-79.2 x + 16. z + 3. x z)) ((28.4 - 5. x + 
           0.25 x^2 + (-24.4 + 8. x - 0.125 x^2) Cos[
             2 t] + (-3. - 0.25 x) x Cos[4 t] + 
           0.125 x^2 Cos[6 t])^2)^(
        1/4))/(E^(2 I t) (-24. - 2. x) x + 
        E^(10 I t) (-24. - 2. x) x + x^2 + E^(12 I t) x^2 + 
        E^(4 I t) (-195.2 + 64. x - 1. x^2) + 
        E^(8 I t) (-195.2 + 64. x - 1. x^2) + 
        E^(6 I t) (454.4 - 80. x + 4. x^2))])]

编辑：我把你的帖子读为“对于t的所有值”。对于

0{{-100100}，{-100100}]

出现了一些收敛警告。我没有调查，但可能是那些孤立的缺失像素

---

这里有一个约束：

Maximize[f[x，y，t]，0expr

可以使用查看某些

z

和

x

域上的区域

还有与

一起操作的

Manipulate[
 ContourPlot[expr /. t -> tStar,
  {z, -100, 100}, {x, -100, 100},
  Contours -> {0},
  ContourShading -> {LightGray, None},
  PlotPoints -> ControlActive[5, 40]
  ]
 ,
 {{tStar, 0}, 0, \[Pi]}
 ]


希望这有帮助

PS：您可能需要刷新或单击图像以查看GIF动画。
查找区域绘图。您应该编辑您的帖子以修复格式。重新发布。。
RegionPlot3D[expr < 0,
 {z, -100, 100}, {t, 0, π}, {x, -100, 100},
 AxesLabel -> Automatic
 ]

Manipulate[
 SliceContourPlot3D[expr,
  {"YStackedPlanes", {tStar}},
  {z, -100, 100}, {t, 0, \[Pi]}, {x, -100, 100},
  Contours -> {0},
  ContourShading -> {LightGray, None},
  PlotPoints -> ControlActive[10, 50],
  AxesLabel -> Automatic
  ]
 ,
 {{tStar, 0}, 0, \[Pi]}
 ]

Manipulate[
 ContourPlot[expr /. t -> tStar,
  {z, -100, 100}, {x, -100, 100},
  Contours -> {0},
  ContourShading -> {LightGray, None},
  PlotPoints -> ControlActive[5, 40]
  ]
 ,
 {{tStar, 0}, 0, \[Pi]}
 ]