为什么在Mathematica中使用Graphics函数时点会消失

Question

我正在做一个非常基本的操作 - 在Mathematica中绘制点。这是代码：

Graphics[
 {
  Point[{0, 0}], Point[{1, 2}]
  }
 ]

我给出了我想要的结果：

但是当我指定“PlotRange”时，我得到一张空白画布。为什么这两个点消失了？

Graphics[
 {
  Point[{0, 0}], Point[{1, 2}]
  },
 PlotRange -> {{0, 0}, {4, 4}}
 ]

截图：

如果您无法重现我遇到的问题，也请告诉我。谢谢。

Answer 1

选项PlotRange使用错误。您必须按此顺序{{xmin, xmax}, {ymin, ymax}}给出矩形绘图范围的角。

在你的情况下

PlotRange -> {{0, 4}, {0, 4}}