能否对数学中的PointSize[]、Thickness[]进行相对大小的更改？

Question

源于this question regarding line thickness and point size setting [如PointSize[Large}，PointSize[0.5]]，我想知道以相对方式改变PointSize[]、Thickness[]等是否可行？

也就是说，为什么PointSize[Larger]不能工作？或者可以以某种方式查询现有的切入点，并可能执行类似PointSize[1.25*GetPointSize[]]的操作(如果存在类似"GetPointSize[]“的东西，既不能快速查看文档，也不能快速反向工程地查看PointSizex)。

Answer 1

您可以使用在值中继承的PointSize的样式选项形式来完成此操作：

Graphics[{Style[{Point[{0, 0}], 
Style[{Point[{.2, 0}], 
  Style[{Point[{.4, 0}], 
    Style[{Point[{.6, 0}], 
      Style[{Point[{.8, 0}]}, PointSize -> .9 Inherited]}, 
     PointSize -> .9 Inherited]}, PointSize -> .9 Inherited]}, 
 PointSize -> .9 Inherited]}, PointSize -> .1]}, PlotRange -> 1]

​

​

Answer 2

例如，Mathematica跟踪的那些选项是由AbsoluteOptions[] Try AbsoluteOptions[Graphics[{Point[{0, 0}]}]]揭示的。不幸的是，PointSize不是跟踪的选项之一。

那么，为什么不简单地使用变量来存储要使用的值呢？

ps = 0.01; Graphics[{PointSize[ps], 
  Table[Point[{RandomReal[], RandomReal[]}], {i, 100}]}]

​

​

然后..。

Graphics[{PointSize[ps*2], 
  Table[Point[{RandomReal[], RandomReal[]}], {i, 100}]}]

​

​

Answer 3

我不能对Belisarius的“指令”评论发表评论，因为缺乏点，所以我在这里插话：

Ragfield的代码可以工作，但是所有的PointSize指令都被标记为红色。格式化为指令，它仍然工作，也没有被标记为错误：

Graphics[
 {
 Style[
  {
   Point[{0, 0}],
   Style[
    {
     Point[{.2, 0}],
     Style[
      {
       Point[{.4, 0}],
       Style[
        {
         Point[{.6, 0}],
         Style[
          {
           Point[{.8, 0}]
          },
          PointSize[.9 Inherited]
         ]
        },
        PointSize[.9 Inherited]
       ]
      },
      PointSize[.9 Inherited]
     ]
    },
    PointSize[.9 Inherited]
   ]
  },
  PointSize[.1]
 ]
},
PlotRange -> 1
]

我喜欢这样的深嵌套结构的格式设置。有人知道如何在堆栈溢出中粘贴格式化的Mma代码，而不必在之后进行手动格式化？

很高兴听到Inherited BTW的消息。显然是从v6开始的，但它在我的雷达下飞行。