haskell - Haskell Diagrams：如何使文本更大？

Question

我正在使用图表haskell绘图框架。下面的代码旨在生成一个橙色的六边形，上面叠加了文本“(0,0)”。不幸的是，文本很小。我试图通过修改 的大小来使其更大rect，但没有运气。

import Diagrams.Prelude
import Diagrams.Backend.SVG.CmdLine

diagram = mconcat [ text "(0,0)" <> rect 8 1,
                    hexagon 20 # lw 0.02 # fc orange # rotateBy (1/4) ]

main = defaultMain (pad 1.1 diagram)

Answer 1

正如 hammar 建议的那样，您可以使用scale，如下所示：

(text "(0,0)" <> rect 8 1) # scale 5

您还可以更改字体大小，例如

text "(0,0)" # fontSize 5 ...