Haskell 图 : How can I make the text bigger?

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 ...