在Mathematica中改善RegionPlot中的角落绘制

Question

我使用RegionPlot在两个变量中显示一个线性不等式系统，以帮助我找到它们都可以满足的参数值，或者如果不存在任何值，感受他们理解为什么。但是当我绘制它们时，RegionPlot非常符合字面切角。我怎样才能得到一个更精确的线性不等式区域图？

这里是一个小例子，（实际的代码更多毛）：

RegionPlot[{y > 0 && x > 0 && x - y > 0, 
    y < .1 && x < .1 && x - y < .1}, {x, -10, 10}, {y, -10, 10}] 

输出情节here。

在这个例子中，Mathematica切断了第一象限区域的左下四分之一，这使得它看起来好像两个区域不相交。但他们这样做。

事情我已经考虑过但被拒绝：

1. 使用FindInstance找到区域的交集。到目前为止，FindInstance未能找到任何交点，但我不确定是否由于具体的参数值选择。更重要的是，如果没有交集，我想通过玩参数（通过Manipulate）了解哪些条件可能会相互矛盾。

2. 更改图形的比例。在我的实际代码中，有几个这样的相交区域，我想在一个图上看到它们。所以我真的想提高角点渲染给出了一个阴谋规模。

Answer 1

的问题是，RegionPlot样品一些初始点，然后细化方面有改动，以改善情节，而不影响通过采样保持不变方面的表现。在这种情况下，我认为它缺少中心细节。

尝试使用PlotPoints增加MaxRecursion选项或点数的初始值，例如，这两个示例会给出好的结果，但性能会受到影响。我认为哪一个更好取决于实际情况。

RegionPlot[{y > 0 && x > 0 && x - y > 0, 
    y < .1 && x < .1 && x - y < .1}, {x, -10, 10}, {y, -10, 10}, 
PlotPoints -> 100] 

RegionPlot[{y > 0 && x > 0 && x - y > 0, 
    y < .1 && x < .1 && x - y < .1}, {x, -10, 10}, {y, -10, 10}, 
MaxRecursion-> 6]