Mathematica 图，排除端点？答案

【问题标题】：Mathematica plot, exclude endpoints?Mathematica 图，排除端点？
【发布时间】：2010-10-12 14:37:53
【问题描述】：

为什么在除以 0 时出现以下错误？

ParametricPlot[{1/Sin[t], t}, {t, 0, 3 Pi}, Exclusions -> Sin[t] == 0]
Power::infy: Infinite expression 1/0 encountered.

它确实成功排除了 Pi 和 2 Pi 处的点，但没有成功排除 0 和 3 Pi 处的点。如果我通过更改间隔来排除端点...

ParametricPlot[{1/Sin[t], t}, {t, 0.001, 2.999 Pi}, Exclusions -> Sin[t] == 0]

我没有收到任何错误。

如何排除绘图的端点？

谢谢，
抢

【问题讨论】：

【解决方案1】：

在这种特殊情况下，您可以使用 Csc[t] 而不是 1/Sin[t] 重新制定情节，并且事情似乎有效：

ParametricPlot[{Csc[t], t}, {t, 0, 3 Pi}, Exclusions -> {Sin[t] == 0}]

我怀疑1/Sin[t] 的行为只是一个错误，因此会报告它。

作为更通用的解决方法，您可以使用 Quiet 包装原始表达式以隐藏错误消息：

Quiet[ParametricPlot[{1/Sin[t], t}, {t, 0, 3 Pi}, 
    Exclusions -> Sin[t] == 0], Power::infy]

【讨论】：