多边形数
多边形数是一种有形数,它涵盖了三角形数、正方形数等直到任意 r-边形数.
返回前 10 个三角形数.
In[1]:=
![Click for copyable input](assets.zh/polygonal-numbers/In_7.png)
Table[PolygonalNumber[n], {n, 1, 10}]
Out[1]=
![](assets.zh/polygonal-numbers/O_6.png)
返回几个标准多边形的第十个 r-边形数.
In[2]:=
![Click for copyable input](assets.zh/polygonal-numbers/In_8.png)
Table[PolygonalNumber[r, 10], {r, 3, 10}]
Out[2]=
![](assets.zh/polygonal-numbers/O_7.png)
多边形数计算在该类标准几何排列中间距相同的点的数目.
显示完整的 Wolfram 语言输入
In[5]:=
![Click for copyable input](assets.zh/polygonal-numbers/In_11.png)
PolygonalNumber[3, 4]
polygonalNumberGraphics[3, 4]
Out[5]=
![](assets.zh/polygonal-numbers/O_8.png)
Out[5]=
![](assets.zh/polygonal-numbers/O_9.png)
In[6]:=
![Click for copyable input](assets.zh/polygonal-numbers/In_12.png)
PolygonalNumber[3, 6]
polygonalNumberGraphics[3, 6]
Out[6]=
![](assets.zh/polygonal-numbers/O_10.png)
Out[6]=
![](assets.zh/polygonal-numbers/O_11.png)
In[7]:=
![Click for copyable input](assets.zh/polygonal-numbers/In_13.png)
PolygonalNumber[6, 5]
polygonalNumberGraphics[6, 5]
Out[7]=
![](assets.zh/polygonal-numbers/O_12.png)
Out[7]=
![](assets.zh/polygonal-numbers/O_13.png)