如何使用metapost生成多边形数字图形？

Question

我正在学习metapost，我想知道如何生成一个像多边形数字http://en.wikipedia.org/wiki/Polygonal_number，我有三角形数字，但不是六角形。

感谢您的帮助。

Answer 1

我想到，如果你不关心绘图点和线条，那么这个问题很简单。以下为罪丑，主要是因为只用fullcircle scaled点的定义，但它的工作原理：

 
beginfig(1); 
pair right, nright; 
u:=1cm; right:=(u,0); 
path p,q,dot,seg; 
dot:=fullcircle scaled (u/2); 
seg:=(0,0)-- (dot shifted right); 
for N=1 upto 6: 
    p:=dot; nright:=(N*u,0); 
    for i=1 upto N: 
    p:=seg -- (p shifted right); 
    endfor 
    q:=(0,0); 
    for j=1 upto 6: 
    q:=p -- ((q rotated 60) shifted nright); 
    endfor 
    draw q; 
endfor 
endfig 

这种方法应该为所有的ñ -gonal数的工作。