多角数
多角数は図形数の一種である.多角数は三角数,四角数等から任意の 角形までを一般化するものである.
最初の10個の三角数を返す.
In[1]:=
![Click for copyable input](assets.ja/polygonal-numbers/In_7.png)
Table[PolygonalNumber[n], {n, 1, 10}]
Out[1]=
![](assets.ja/polygonal-numbers/O_6.png)
いくつかの正多角形の10番目の 角数を返す.
In[2]:=
![Click for copyable input](assets.ja/polygonal-numbers/In_8.png)
Table[PolygonalNumber[r, 10], {r, 3, 10}]
Out[2]=
![](assets.ja/polygonal-numbers/O_7.png)
多角数は,この種の規則的な幾何学的配列で等間隔に置かれた点の数を数える.
完全なWolfram言語入力を表示する
In[5]:=
![Click for copyable input](assets.ja/polygonal-numbers/In_11.png)
PolygonalNumber[3, 4]
polygonalNumberGraphics[3, 4]
Out[5]=
![](assets.ja/polygonal-numbers/O_8.png)
Out[5]=
![](assets.ja/polygonal-numbers/O_9.png)
In[6]:=
![Click for copyable input](assets.ja/polygonal-numbers/In_12.png)
PolygonalNumber[3, 6]
polygonalNumberGraphics[3, 6]
Out[6]=
![](assets.ja/polygonal-numbers/O_10.png)
Out[6]=
![](assets.ja/polygonal-numbers/O_11.png)
In[7]:=
![Click for copyable input](assets.ja/polygonal-numbers/In_13.png)
PolygonalNumber[6, 5]
polygonalNumberGraphics[6, 5]
Out[7]=
![](assets.ja/polygonal-numbers/O_12.png)
Out[7]=
![](assets.ja/polygonal-numbers/O_13.png)