我正在使用图表 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)
答案 0 :(得分:9)
正如hammar建议的那样,你可以使用scale
,如下所示:
(text "(0,0)" <> rect 8 1) # scale 5
您也可以更改字体大小,例如
text "(0,0)" # fontSize 5 ...